home *** CD-ROM | disk | FTP | other *** search
| Unknown | 2000-01-19 | 131.8 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 94 01 00 01 41 41 41 | 41 41 41 41 41 41 41 41 |.....AAA|AAAAAAAA|
|00000010| 41 41 41 41 41 01 04 54 | 42 46 6e 00 00 01 00 01 |AAAAA..T|BFn.....|
|00000020| 01 10 54 42 46 69 6e 64 | 65 72 20 32 2e 30 20 50 |..TBFind|er 2.0 P|
|00000030| 50 43 80 80 e4 02 80 80 | e4 02 02 00 00 03 00 03 |PC......|........|
|00000040| 32 2e 30 3c 32 2e 30 2c | 20 62 79 20 46 61 62 69 |2.0<2.0,| by Fabi|
|00000050| 61 6e 20 4c 69 64 6d 61 | 6e 20 28 66 61 62 69 61 |an Lidma|n (fabia|
|00000060| 6e 2e 6c 69 64 6d 61 6e | 40 73 77 69 70 6e 65 74 |n.lidman|@swipnet|
|00000070| 2e 73 65 29 20 61 6e 64 | 20 6f 74 68 65 72 73 2e |.se) and| others.|
|00000080| 27 68 74 74 70 3a 2f 2f | 68 6f 6d 65 2e 73 77 69 |'http://|home.swi|
|00000090| 70 6e 65 74 2e 73 65 2f | 7e 77 2d 34 32 30 34 30 |pnet.se/|~w-42040|
|000000a0| 2f 72 62 2e 68 74 6d 6c | 01 00 0b 41 70 70 4e 61 |/rb.html|...AppNa|
|000000b0| 6d 65 2e 65 78 65 00 0e | 4d 79 20 41 70 70 6c 69 |me.exe..|My Appli|
|000000c0| 63 61 74 69 6f 6e b8 02 | 9b 01 a8 09 97 09 02 69 |cation..|.......i|
|000000d0| 63 6c 38 80 10 00 00 00 | 00 00 00 00 00 00 00 00 |cl8.....|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000120| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff 00 |........|........|
|00000130| 00 00 00 00 00 00 ff 04 | 0b 0b 0b ff ff ff fa 7f |........|........|
|00000140| fa 7f fa 7f fa 7f fa 7f | fa 7f fa 7f fa 7f ff f9 |........|........|
|00000150| 00 00 00 00 00 00 ff fc | 0b 0b 0b ff ff ff 7f fb |........|........|
|00000160| 7f fb 7f fb 7f fb 7f fb | 7f fb 7f fb 7f fb ff f9 |........|........|
|00000170| 00 00 00 00 00 00 ff fc | fd ff 0b ff ff ff fb 7f |........|........|
|00000180| fb 7f fb 7f fb 7f fb 7f | fb 7f fb 7f fb 7f ff f9 |........|........|
|00000190| 00 00 00 00 00 00 ff fc | fd ff ff ff ff ff 7f fb |........|........|
|000001a0| 7f fb 7f fb 7f fb 7f fb | 7f fb 7f fb 7f fb ff f9 |........|........|
|000001b0| 00 00 00 00 00 00 ff 04 | fd ff ff ff ff ff fb 7f |........|........|
|000001c0| fb 7f fb 7f fb 7f fb 7f | fb 7f fb 7f fb 7f ff f9 |........|........|
|000001d0| 00 00 00 00 00 00 ff 04 | 0b 0b ff ff ff ff 7f fb |........|........|
|000001e0| 7f fb 7f fb 7f fb 7f fb | 7f fb 7f fb 7f fb ff f9 |........|........|
|000001f0| 00 00 00 00 00 00 ff 04 | 0b 0b 0b ff ff ff fb 7f |........|........|
|00000200| fb 7f fb 7f fb 7f fb 7f | fb 7f fb ff ff 7f ff f9 |........|........|
|00000210| 00 00 00 00 00 00 ff fc | 0b 0b 0b ff ff ff 7f fb |........|........|
|00000220| 7f fb 7f fb 7f fb 7f fb | 7f ff ff 75 4b ff ff f9 |........|...uK...|
|00000230| 00 00 00 00 00 00 ff fc | fd ff 0b ff ff ff fb 7f |........|........|
|00000240| fb 7f fb 7f fb 7f 7f ff | ff 75 4b 4b 4b 4b 4b ff |........|.uKKKKK.|
|00000250| ff 00 00 00 00 00 ff fc | fd ff ff ff ff ff 7f fb |........|........|
|00000260| 7f fb 7f fb 7f fb ff 75 | 4b 4b 4b 4b 4b 4b 4b 4b |.......u|KKKKKKKK|
|00000270| 4b ff f8 00 00 00 ff 04 | fd ff ff ff ff ff fb 7f |K.......|........|
|00000280| fb 7f fb 7f fb ff 75 4b | 4b 4b 4b 4b 4b 4b 4b 4b |......uK|KKKKKKKK|
|00000290| 4b a0 ff 00 00 00 ff 04 | 0b 0b ff ff ff ff 7f fb |K.......|........|
|000002a0| 7f fb 7f fb 7f ff 75 75 | 75 4b 4b 4b 4b 4b 4b a0 |......uu|uKKKKKK.|
|000002b0| a0 a0 ff 00 00 00 ff 04 | 0b 0b 0b ff ff ff fb 7f |........|........|
|000002c0| fb 7f fb 7f fb ff 75 75 | 75 75 75 4b 4b a0 a0 a0 |......uu|uuuKK...|
|000002d0| a0 a0 ff 00 00 00 ff fc | 0b 0b 0b ff ff ff 7f fb |........|........|
|000002e0| 7f fb 7f fb 7f ff 75 75 | 75 75 75 75 a0 a0 a0 a0 |......uu|uuuu....|
|000002f0| a0 a0 ff 00 00 00 ff fc | fd ff 0b ff ff ff fb 7f |........|........|
|00000300| fb 7f fb 7f fb ff 75 75 | 75 75 75 75 75 a0 a0 a0 |......uu|uuuuu...|
|00000310| a0 a0 ff 00 00 00 ff fc | fd ff ff ff ff ff 7f fb |........|........|
|00000320| 7f fb 7f fb 7f ff 75 75 | 75 75 75 75 a0 a0 a0 a0 |......uu|uuuu....|
|00000330| a0 a0 ff 00 00 00 ff 04 | fd ff ff ff ff ff fb 7f |........|........|
|00000340| fb 7f fb 7f fb ff 75 75 | 75 75 75 75 75 a0 a0 a0 |......uu|uuuuu...|
|00000350| a0 a0 ff 00 00 00 ff 04 | 0b 0b ff ff ff ff 7f fb |........|........|
|00000360| 7f fb 7f fb 7f fb ff 7b | 75 75 75 75 a0 a0 a0 a0 |.......{|uuuu....|
|00000370| a0 ff f8 00 00 00 ff 04 | 0b 0b 0b ff ff ff fb 7f |........|........|
|00000380| fb 7f fb 7f fb 7f fb ff | ff 7b 75 75 75 a0 a0 ff |........|.{uuu...|
|00000390| ff 00 00 00 00 00 ff fc | 0b 0b 0b ff ff ff 7f fb |........|........|
|000003a0| 7f fb 7f fb 7f fb 7f fb | 7f ff ff 7b a0 ff ff f9 |........|...{....|
|000003b0| 00 00 00 00 00 00 ff fc | fd ff 0b ff ff ff fb 7f |........|........|
|000003c0| fb 7f fb 7f fb 7f fb 7f | fb 7f fb ff ff 7f ff f9 |........|........|
|000003d0| 00 00 00 00 00 00 ff fc | fd ff ff ff ff ff 7f fb |........|........|
|000003e0| 7f fb 7f fb 7f fb 7f fb | 7f fb 7f fb 7f fb ff f9 |........|........|
|000003f0| 00 00 00 00 00 00 ff 04 | ff ff ff ff ff ff fc 7f |........|........|
|00000400| fc 7f fc 7f fc 7f fc 7f | fc 7f fc 7f fc 7f ff f9 |........|........|
|00000410| 00 00 00 00 00 00 ff 0b | 5f 5f ff ff ff ff 7f fd |........|__......|
|00000420| 7f fd 7f fd 7f fd 7f fd | 7f fd 7f fd 7f fd ff f9 |........|........|
|00000430| 00 00 00 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000440| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff f9 |........|........|
|00000450| 00 00 00 00 00 00 00 f9 | f9 f9 f9 f9 f9 f9 f9 f9 |........|........|
|00000460| f9 f9 f9 f9 f9 f9 f9 f9 | f9 f9 f9 f9 f9 f9 f9 f9 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 49 43 4e | 23 80 04 00 00 00 00 00 |.....ICN|#.......|
|000004e0| 00 00 00 7f ff ff c0 43 | ff ff c0 63 ff ff c0 7b |.......C|...c...{|
|000004f0| ff ff c0 7f ff ff c0 5f | ff ff c0 47 ff ff c0 43 |......._|...G...C|
|00000500| ff ff c0 63 ff fc c0 7b | ff f0 30 7f ff c0 08 5f |...c...{|..0...._|
|00000510| ff 80 0c 47 ff 80 3c 43 | ff 80 fc 63 ff 81 fc 7b |...G..<C|...c...{|
|00000520| ff 80 fc 7f ff 81 fc 5f | ff 80 fc 47 ff c1 f8 43 |......._|...G...C|
|00000530| ff f0 f0 63 ff fd c0 7b | ff ff c0 7f ff ff c0 5f |...c...{|......._|
|00000540| ff ff c0 5f ff ff c0 7f | ff ff c0 00 00 00 00 00 |..._....|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 7f ff ff c0 7f | ff ff e0 7f ff ff e0 7f |........|........|
|00000570| ff ff e0 7f ff ff e0 7f | ff ff e0 7f ff ff e0 7f |........|........|
|00000580| ff ff e0 7f ff ff e0 7f | ff ff f0 7f ff ff fc 7f |........|........|
|00000590| ff ff fc 7f ff ff fc 7f | ff ff fc 7f ff ff fc 7f |........|........|
|000005a0| ff ff fc 7f ff ff fc 7f | ff ff fc 7f ff ff fc 7f |........|........|
|000005b0| ff ff f0 7f ff ff e0 7f | ff ff e0 7f ff ff e0 7f |........|........|
|000005c0| ff ff e0 7f ff ff e0 7f | ff ff e0 3f ff ff e0 00 |........|...?....|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 02 0f 70 72 65 |........|.....pre|
|000005e0| 66 65 72 65 6e 63 65 20 | 66 69 6c 65 04 54 42 46 |ference |file.TBF|
|000005f0| 6e 04 70 72 65 66 00 00 | 03 74 78 74 04 54 42 46 |n.pref..|.txt.TBF|
|00000600| 6e 04 54 45 58 54 00 01 | 01 69 63 6c 38 80 10 00 |n.TEXT..|.icl8...|
|00000610| 00 00 ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000620| ff ff ff ff ff 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000630| 00 00 ff 02 02 02 02 ac | ac f8 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000650| 00 00 ff fc 04 04 04 fe | fe f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000660| f5 f5 f5 f5 ff f8 ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 ff fc fd ff 0b ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000680| f5 f5 f5 f5 ff f8 f8 ff | 00 00 00 00 00 00 00 00 |........|........|
|00000690| 00 00 ff fc fd ff ff ff | ff f8 f5 f5 ff ff ff f5 |........|........|
|000006a0| ff ff ff f5 ff f8 f8 f8 | ff 00 00 00 00 00 00 00 |........|........|
|000006b0| 00 00 ff 04 fd ff ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|000006c0| f5 f5 f5 f5 ff f8 f8 f8 | f8 ff 00 00 00 00 00 00 |........|........|
|000006d0| 00 00 ff 04 0b 0b ff ff | ff f8 f5 f5 ff ff ff ff |........|........|
|000006e0| f5 ff ff f5 ff ff ff ff | ff ff ff 00 00 00 00 00 |........|........|
|000006f0| 00 00 ff 04 0b 0b 0b ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000700| f5 f5 f5 f5 f5 f7 f7 f7 | f7 f7 ff 00 00 00 00 00 |........|........|
|00000710| 00 00 ff fc 0b 0b 0b ff | ff f8 f5 f5 ff ff ff ff |........|........|
|00000720| ff f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000730| 00 00 ff fc fd ff 0b ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000740| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000750| 00 00 ff fc fd ff ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000760| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000770| 00 00 ff 04 fd ff ff ff | ff f8 f5 f5 ff ff ff ff |........|........|
|00000780| ff f5 ff ff f5 ff ff ff | f5 f7 ff 00 00 00 00 00 |........|........|
|00000790| 00 00 ff 04 0b 0b ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|000007a0| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|000007b0| 00 00 ff 04 0b 0b 0b ff | ff f8 f5 f5 ff ff ff ff |........|........|
|000007c0| f5 ff ff ff ff ff f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|000007d0| 00 00 ff fc 0b 0b 0b ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|000007e0| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|000007f0| 00 00 ff fc fd ff 0b ff | ff f8 f5 f5 ff ff f5 ff |........|........|
|00000800| ff ff ff ff f5 ff ff f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000810| 00 00 ff fc fd ff ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000820| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000830| 00 00 ff 04 fd ff ff ff | ff f8 f5 f5 ff ff ff ff |........|........|
|00000840| f5 ff ff f5 ff ff ff f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000850| 00 00 ff 04 0b 0b ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000860| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000870| 00 00 ff 04 0b 0b 0b ff | ff f8 f5 f5 ff ff ff ff |........|........|
|00000880| f5 ff ff ff ff ff ff f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000890| 00 00 ff fc 0b 0b 0b ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|000008a0| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|000008b0| 00 00 ff fc fd ff 0b ff | ff f8 f5 f5 ff ff f5 ff |........|........|
|000008c0| ff ff ff f5 ff ff ff f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|000008d0| 00 00 ff fc fd ff ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|000008e0| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|000008f0| 00 00 ff 04 fd ff ff ff | ff f8 f5 f5 ff ff ff ff |........|........|
|00000900| ff f5 ff ff f5 f5 ff f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000910| 00 00 ff 04 0b 0b ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000920| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000930| 00 00 ff 04 0b 0b 0b ff | ff f8 f5 f5 ff ff ff f5 |........|........|
|00000940| ff ff f5 ff ff ff ff f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000950| 00 00 ff fc 0b 0b 0b ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000960| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000970| 00 00 ff fc fd ff 0b ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|00000980| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|00000990| 00 00 ff fc fd ff ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|000009a0| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|000009b0| 00 00 ff 04 ff ff ff ff | ff f8 f5 f5 f5 f5 f5 f5 |........|........|
|000009c0| f5 f5 f5 f5 f5 f5 f5 f5 | f5 f7 ff 00 00 00 00 00 |........|........|
|000009d0| 00 00 ff 0b 5f 5f ff ff | ff f8 f7 f7 f7 f7 f7 f7 |....__..|........|
|000009e0| f7 f7 f7 f7 f7 f7 f7 f7 | f7 f7 ff 00 00 00 00 00 |........|........|
|000009f0| 00 00 ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000a00| ff ff ff ff ff ff ff ff | ff ff ff 00 00 00 00 01 |........|........|
|00000a10| 1f 04 56 69 65 77 0d 46 | 69 6e 64 54 42 43 61 6c |..View.F|indTBCal|
|00000a20| 6c 57 4e 44 05 ad 01 8c | 02 0e 31 91 0c a8 06 a4 |lWND....|..1.....|
|00000a30| 02 13 04 4e 61 6d 65 0d | 46 69 6e 64 54 42 43 61 |...Name.|FindTBCa|
|00000a40| 6c 6c 57 4e 44 05 46 72 | 61 6d 65 01 30 0c 48 61 |llWND.Fr|ame.0.Ha|
|00000a50| 73 42 61 63 6b 43 6f 6c | 6f 72 05 46 61 6c 73 65 |sBackCol|or.False|
|00000a60| 09 42 61 63 6b 43 6f 6c | 6f 72 08 31 36 37 37 37 |.BackCol|or.16777|
|00000a70| 32 31 35 08 42 61 63 6b | 64 72 6f 70 01 30 05 54 |215.Back|drop.0.T|
|00000a80| 69 74 6c 65 11 46 69 6e | 64 20 54 6f 6f 6c 62 6f |itle.Fin|d Toolbo|
|00000a90| 78 20 43 61 6c 6c 07 56 | 69 73 69 62 6c 65 04 54 |x Call.V|isible.T|
|00000aa0| 72 75 65 08 43 6c 6f 73 | 65 42 6f 78 04 54 72 75 |rue.Clos|eBox.Tru|
|00000ab0| 65 08 47 72 6f 77 49 63 | 6f 6e 05 46 61 6c 73 65 |e.GrowIc|on.False|
|00000ac0| 08 5a 6f 6f 6d 49 63 6f | 6e 05 46 61 6c 73 65 0b |.ZoomIco|n.False.|
|00000ad0| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 09 4d 61 63 |BalloonH|elp..Mac|
|00000ae0| 50 72 6f 63 49 44 01 30 | 09 50 6c 61 63 65 6d 65 |ProcID.0|.Placeme|
|00000af0| 6e 74 01 30 05 57 69 64 | 74 68 03 33 36 35 06 48 |nt.0.Wid|th.365.H|
|00000b00| 65 69 67 68 74 03 31 36 | 38 08 4d 69 6e 57 69 64 |eight.16|8.MinWid|
|00000b10| 74 68 02 36 34 09 4d 69 | 6e 48 65 69 67 68 74 02 |th.64.Mi|nHeight.|
|00000b20| 36 34 08 4d 61 78 57 69 | 64 74 68 05 33 32 30 30 |64.MaxWi|dth.3200|
|00000b30| 30 09 4d 61 78 48 65 69 | 67 68 74 05 33 32 30 30 |0.MaxHei|ght.3200|
|00000b40| 30 07 00 0d 46 69 6e 64 | 54 42 43 61 6c 6c 57 4e |0...Find|TBCallWN|
|00000b50| 44 b1 01 06 41 70 70 6c | 65 74 00 01 12 69 6e 69 |D...Appl|et...ini|
|00000b60| 74 74 65 64 20 61 73 20 | 62 6f 6f 6c 65 61 6e 00 |tted as |boolean.|
|00000b70| 03 0e 45 6e 61 62 6c 65 | 43 6f 6e 74 72 6f 6c 73 |..Enable|Controls|
|00000b80| 0c 62 20 61 73 20 62 6f | 6f 6c 65 61 6e 00 00 03 |.b as bo|olean...|
|00000b90| 10 03 14 16 20 53 75 62 | 20 45 6e 61 62 6c 65 43 |.... Sub| EnableC|
|00000ba0| 6f 6e 74 72 6f 6c 73 28 | 62 20 61 73 20 62 6f 6f |ontrols(|b as boo|
|00000bb0| 6c 65 61 6e 29 18 57 69 | 74 68 36 38 4b 43 68 65 |lean).Wi|th68KChe|
|00000bc0| 63 6b 2e 65 6e 61 62 6c | 65 64 20 3d 20 62 00 1f |ck.enabl|ed = b..|
|00000bd0| 69 66 20 54 42 43 61 6c | 6c 4e 61 6d 65 45 46 2e |if TBCal|lNameEF.|
|00000be0| 74 65 78 74 20 3c 3e 20 | 22 22 20 74 68 65 6e 15 |text <> |"" then.|
|00000bf0| 53 65 61 72 63 68 42 54 | 4e 2e 65 6e 61 62 6c 65 |SearchBT|N.enable|
|00000c00| 64 20 3d 20 62 06 65 6e | 64 20 69 66 00 19 54 42 |d = b.en|d if..TB|
|00000c10| 43 61 6c 6c 4e 61 6d 65 | 4c 42 4c 2e 45 6e 61 62 |CallName|LBL.Enab|
|00000c20| 6c 65 28 20 62 20 29 00 | 18 54 42 43 61 6c 6c 4e |le( b ).|.TBCallN|
|00000c30| 61 6d 65 45 46 2e 65 6e | 61 62 6c 65 64 20 3d 20 |ameEF.en|abled = |
|00000c40| 62 00 13 51 75 65 72 79 | 47 42 2e 65 6e 61 62 6c |b..Query|GB.enabl|
|00000c50| 65 64 20 3d 20 62 00 15 | 53 65 70 61 72 61 74 6f |ed = b..|Separato|
|00000c60| 72 2e 65 6e 61 62 6c 65 | 64 20 3d 20 62 00 15 42 |r.enable|d = b..B|
|00000c70| 72 6f 77 73 65 42 54 4e | 2e 65 6e 61 62 6c 65 64 |rowseBTN|.enabled|
|00000c80| 20 3d 20 62 00 19 4c 69 | 6d 69 74 53 65 61 72 63 | = b..Li|mitSearc|
|00000c90| 68 43 42 2e 65 6e 61 62 | 6c 65 64 20 3d 20 62 14 |hCB.enab|led = b.|
|00000ca0| 55 48 4c 69 73 74 50 4d | 2e 65 6e 61 62 6c 65 64 |UHListPM|.enabled|
|00000cb0| 20 3d 20 62 00 12 42 47 | 43 61 6e 76 61 73 2e 65 | = b..BG|Canvas.e|
|00000cc0| 6e 61 62 6c 65 28 62 29 | 07 45 6e 64 20 53 75 62 |nable(b)|.End Sub|
|00000cd0| 14 53 68 6f 77 50 72 6f | 67 72 65 73 73 43 6f 6e |.ShowPro|gressCon|
|00000ce0| 74 72 6f 6c 73 0c 62 20 | 61 73 20 62 6f 6f 6c 65 |trols.b |as boole|
|00000cf0| 61 6e 00 00 08 00 08 00 | 14 26 53 75 62 20 53 68 |an......|.&Sub Sh|
|00000d00| 6f 77 50 72 6f 67 72 65 | 73 73 43 6f 6e 74 72 6f |owProgre|ssContro|
|00000d10| 6c 73 28 62 20 61 73 20 | 62 6f 6f 6c 65 61 6e 29 |ls(b as |boolean)|
|00000d20| 23 53 54 53 65 61 72 63 | 68 4c 61 62 65 6c 2e 76 |#STSearc|hLabel.v|
|00000d30| 69 73 69 62 6c 65 20 3d | 20 62 20 2f 2f 20 6a 61 |isible =| b // ja|
|00000d40| 6b 6f 62 62 26 53 54 53 | 65 61 72 63 68 53 75 62 |kobb&STS|earchSub|
|00000d50| 4c 61 62 65 6c 2e 76 69 | 73 69 62 6c 65 20 3d 20 |Label.vi|sible = |
|00000d60| 62 20 2f 2f 20 6a 61 6b | 6f 62 62 1e 43 41 53 65 |b // jak|obb.CASe|
|00000d70| 61 72 63 68 2e 76 69 73 | 69 62 6c 65 20 3d 20 62 |arch.vis|ible = b|
|00000d80| 20 2f 2f 20 6a 61 6b 6f | 62 62 00 0c 2f 2f 20 67 | // jako|bb..// g|
|00000d90| 75 69 6c 6c 61 75 6d 65 | 2b 2f 2f 20 6e 6f 74 20 |uillaume|+// not |
|00000da0| 75 73 69 6e 67 20 45 6e | 61 62 6c 65 43 6f 6e 74 |using En|ableCont|
|00000db0| 72 6f 6c 73 20 62 65 63 | 61 75 73 65 20 77 65 20 |rols bec|ause we |
|00000dc0| 77 61 6e 74 28 2f 2f 20 | 74 6f 20 6b 65 65 70 20 |want(// |to keep |
|00000dd0| 74 68 65 20 73 74 72 69 | 70 70 65 64 20 6c 69 6e |the stri|pped lin|
|00000de0| 65 73 20 65 6e 61 62 6c | 65 64 20 3b 29 1d 57 69 |es enabl|ed ;).Wi|
|00000df0| 74 68 36 38 4b 43 68 65 | 63 6b 2e 65 6e 61 62 6c |th68KChe|ck.enabl|
|00000e00| 65 64 20 3d 20 6e 6f 74 | 28 62 29 1a 53 65 61 72 |ed = not|(b).Sear|
|00000e10| 63 68 42 54 4e 2e 65 6e | 61 62 6c 65 64 20 3d 20 |chBTN.en|abled = |
|00000e20| 6e 6f 74 28 62 29 1b 54 | 42 43 61 6c 6c 4e 61 6d |not(b).T|BCallNam|
|00000e30| 65 4c 42 4c 2e 45 6e 61 | 62 6c 65 20 6e 6f 74 28 |eLBL.Ena|ble not(|
|00000e40| 62 29 1d 54 42 43 61 6c | 6c 4e 61 6d 65 45 46 2e |b).TBCal|lNameEF.|
|00000e50| 65 6e 61 62 6c 65 64 20 | 3d 20 6e 6f 74 28 62 29 |enabled |= not(b)|
|00000e60| 18 51 75 65 72 79 47 42 | 2e 65 6e 61 62 6c 65 64 |.QueryGB|.enabled|
|00000e70| 20 3d 20 6e 6f 74 28 62 | 29 1a 53 65 70 61 72 61 | = not(b|).Separa|
|00000e80| 74 6f 72 2e 65 6e 61 62 | 6c 65 64 20 3d 20 6e 6f |tor.enab|led = no|
|00000e90| 74 28 62 29 1a 42 72 6f | 77 73 65 42 54 4e 2e 65 |t(b).Bro|wseBTN.e|
|00000ea0| 6e 61 62 6c 65 64 20 3d | 20 6e 6f 74 28 62 29 1e |nabled =| not(b).|
|00000eb0| 4c 69 6d 69 74 53 65 61 | 72 63 68 43 42 2e 65 6e |LimitSea|rchCB.en|
|00000ec0| 61 62 6c 65 64 20 3d 20 | 6e 6f 74 28 62 29 19 55 |abled = |not(b).U|
|00000ed0| 48 4c 69 73 74 50 4d 2e | 65 6e 61 62 6c 65 64 20 |HListPM.|enabled |
|00000ee0| 3d 20 6e 6f 74 28 62 29 | 00 0e 73 65 6c 66 2e 72 |= not(b)|..self.r|
|00000ef0| 65 66 72 65 73 68 28 29 | 07 45 6e 64 20 53 75 62 |efresh()|.End Sub|
|00000f00| 0b 44 6f 54 68 65 53 65 | 61 72 63 68 0f 66 20 61 |.DoTheSe|arch.f a|
|00000f10| 73 20 66 6f 6c 64 65 72 | 49 74 65 6d 00 00 2f 02 |s folder|Item../.|
|00000f20| 2f 02 3e 20 53 75 62 20 | 44 6f 54 68 65 53 65 61 |/.> Sub |DoTheSea|
|00000f30| 72 63 68 28 66 20 61 73 | 20 66 6f 6c 64 65 72 49 |rch(f as| folderI|
|00000f40| 74 65 6d 29 84 01 64 69 | 6d 20 71 75 65 72 79 2c |tem)..di|m query,|
|00000f50| 20 72 65 73 75 6c 74 2c | 20 72 65 67 73 2c 20 63 | result,| regs, c|
|00000f60| 6f 6d 6d 65 6e 74 20 61 | 73 20 73 74 72 69 6e 67 |omment a|s string|
|00000f70| 2c 20 68 65 61 64 65 72 | 46 69 6c 65 20 61 73 20 |, header|File as |
|00000f80| 46 6f 6c 64 65 72 49 74 | 65 6d 37 64 69 6d 20 52 |FolderIt|em7dim R|
|00000f90| 57 69 6e 64 6f 77 20 61 | 73 20 53 65 61 72 63 68 |Window a|s Search|
|00000fa0| 52 65 73 75 6c 74 73 57 | 4e 44 2c 20 66 69 6e 64 |ResultsW|ND, find|
|00000fb0| 36 38 4b 63 6f 64 65 20 | 61 73 20 42 6f 6f 6c 65 |68Kcode |as Boole|
|00000fc0| 61 6e 15 64 69 6d 20 77 | 69 6e 4e 75 6d 20 61 73 |an.dim w|inNum as|
|00000fd0| 20 69 6e 74 65 67 65 72 | 19 64 69 6d 20 63 61 72 | integer|.dim car|
|00000fe0| 62 6f 6e 49 6e 66 6f 20 | 61 73 20 69 6e 74 65 67 |bonInfo |as integ|
|00000ff0| 65 72 18 64 69 6d 20 73 | 65 61 72 63 68 54 69 6d |er.dim s|earchTim|
|00001000| 65 20 61 73 20 64 6f 75 | 62 6c 65 00 19 71 75 65 |e as dou|ble..que|
|00001010| 72 79 20 3d 20 54 42 43 | 61 6c 6c 4e 61 6d 65 45 |ry = TBC|allNameE|
|00001020| 46 2e 74 65 78 74 20 66 | 69 6e 64 36 38 4b 63 6f |F.text f|ind68Kco|
|00001030| 64 65 20 3d 20 57 69 74 | 68 36 38 4b 43 68 65 63 |de = Wit|h68KChec|
|00001040| 6b 2e 76 61 6c 75 65 00 | 24 69 66 20 47 65 74 55 |k.value.|$if GetU|
|00001050| 6e 69 76 65 72 73 61 6c | 48 65 61 64 65 72 73 28 |niversal|Headers(|
|00001060| 29 20 3c 3e 20 4e 49 4c | 20 74 68 65 6e 10 69 66 |) <> NIL| then.if|
|00001070| 20 66 20 3c 3e 20 4e 49 | 4c 20 74 68 65 6e 0e 68 | f <> NI|L then.h|
|00001080| 65 61 64 65 72 46 69 6c | 65 20 3d 20 66 04 65 6c |eaderFil|e = f.el|
|00001090| 73 65 1c 53 68 6f 77 50 | 72 6f 67 72 65 73 73 43 |se.ShowP|rogressC|
|000010a0| 6f 6e 74 72 6f 6c 73 28 | 20 74 72 75 65 20 29 06 |ontrols(| true ).|
|000010b0| 65 6e 64 20 69 66 00 12 | 73 65 61 72 63 68 54 69 |end if..|searchTi|
|000010c0| 6d 65 20 3d 20 74 69 63 | 6b 73 00 86 01 69 66 20 |me = tic|ks...if |
|000010d0| 46 69 6e 64 54 42 43 61 | 6c 6c 28 71 75 65 72 79 |FindTBCa|ll(query|
|000010e0| 2c 20 72 65 73 75 6c 74 | 2c 20 72 65 67 73 2c 20 |, result|, regs, |
|000010f0| 68 65 61 64 65 72 46 69 | 6c 65 2c 20 66 69 6e 64 |headerFi|le, find|
|00001100| 36 38 4b 63 6f 64 65 2c | 20 73 65 6c 66 29 20 74 |68Kcode,| self) t|
|00001110| 68 65 6e 1d 53 68 6f 77 | 50 72 6f 67 72 65 73 73 |hen.Show|Progress|
|00001120| 43 6f 6e 74 72 6f 6c 73 | 28 20 66 61 6c 73 65 20 |Controls|( false |
|00001130| 29 00 20 77 69 6e 4e 75 | 6d 20 3d 20 46 69 6e 64 |). winNu|m = Find|
|00001140| 57 69 6e 64 6f 77 42 79 | 4e 61 6d 65 28 71 75 65 |WindowBy|Name(que|
|00001150| 72 79 29 13 69 66 20 77 | 69 6e 4e 75 6d 20 3d 20 |ry).if w|inNum = |
|00001160| 2d 31 20 74 68 65 6e 1e | 52 57 69 6e 64 6f 77 20 |-1 then.|RWindow |
|00001170| 3d 20 6e 65 77 20 53 65 | 61 72 63 68 52 65 73 75 |= new Se|archResu|
|00001180| 6c 74 73 57 4e 44 04 65 | 6c 73 65 2a 52 57 69 6e |ltsWND.e|lse*RWin|
|00001190| 64 6f 77 20 3d 20 53 65 | 61 72 63 68 52 65 73 75 |dow = Se|archResu|
|000011a0| 6c 74 73 57 4e 44 28 77 | 69 6e 64 6f 77 28 77 69 |ltsWND(w|indow(wi|
|000011b0| 6e 4e 75 6d 29 29 06 65 | 6e 64 20 69 66 21 52 57 |nNum)).e|nd if!RW|
|000011c0| 69 6e 64 6f 77 2e 74 69 | 74 6c 65 20 3d 20 54 42 |indow.ti|tle = TB|
|000011d0| 43 61 6c 6c 4e 61 6d 65 | 45 46 2e 74 65 78 74 26 |CallName|EF.text&|
|000011e0| 52 57 69 6e 64 6f 77 2e | 48 4e 61 6d 65 53 54 2e |RWindow.|HNameST.|
|000011f0| 74 65 78 74 20 3d 20 68 | 65 61 64 65 72 46 69 6c |text = h|eaderFil|
|00001200| 65 2e 6e 61 6d 65 a9 01 | 52 57 69 6e 64 6f 77 2e |e.name..|RWindow.|
|00001210| 52 42 44 65 63 6c 61 72 | 65 53 54 2e 74 65 78 74 |RBDeclar|eST.text|
|00001220| 20 3d 20 47 65 74 52 42 | 44 65 63 6c 61 72 61 74 | = GetRB|Declarat|
|00001230| 69 6f 6e 28 54 42 43 61 | 6c 6c 4e 61 6d 65 45 46 |ion(TBCa|llNameEF|
|00001240| 2e 74 65 78 74 2c 72 65 | 73 75 6c 74 2c 72 65 67 |.text,re|sult,reg|
|00001250| 73 2c 66 69 6e 64 36 38 | 4b 63 6f 64 65 2c 68 65 |s,find68|Kcode,he|
|00001260| 61 64 65 72 46 69 6c 65 | 2c 63 6f 6d 6d 65 6e 74 |aderFile|,comment|
|00001270| 29 12 69 66 20 72 65 67 | 73 20 3c 3e 20 22 22 20 |).if reg|s <> "" |
|00001280| 74 68 65 6e 36 72 65 73 | 75 6c 74 20 3d 20 22 23 |then6res|ult = "#|
|00001290| 70 72 61 67 6d 61 20 70 | 61 72 61 6d 65 74 65 72 |pragma p|arameter|
|000012a0| 22 20 2b 20 72 65 67 73 | 20 2b 20 43 68 72 28 31 |" + regs| + Chr(1|
|000012b0| 33 29 20 2b 20 72 65 73 | 75 6c 74 03 65 6e 64 20 |3) + res|ult.end |
|000012c0| 52 57 69 6e 64 6f 77 2e | 43 44 65 63 6c 61 72 65 |RWindow.|CDeclare|
|000012d0| 53 54 2e 74 65 78 74 20 | 3d 20 72 65 73 75 6c 74 |ST.text |= result|
|000012e0| 1e 52 57 69 6e 64 6f 77 | 2e 43 6f 64 65 43 6f 6d |.RWindow|.CodeCom|
|000012f0| 6d 65 6e 74 73 20 3d 20 | 63 6f 6d 6d 65 6e 74 1f |ments = |comment.|
|00001300| 52 57 69 6e 64 6f 77 2e | 68 65 61 64 65 72 46 69 |RWindow.|headerFi|
|00001310| 6c 65 20 3d 20 68 65 61 | 64 65 72 46 69 6c 65 2c |le = hea|derFile,|
|00001320| 52 57 69 6e 64 6f 77 2e | 43 56 4f 70 65 6e 46 69 |RWindow.|CVOpenFi|
|00001330| 6c 65 2e 74 79 70 65 20 | 3d 20 68 65 61 64 65 72 |le.type |= header|
|00001340| 46 69 6c 65 2e 4d 61 63 | 54 79 70 65 32 52 57 69 |File.Mac|Type2RWi|
|00001350| 6e 64 6f 77 2e 43 56 4f | 70 65 6e 46 69 6c 65 2e |ndow.CVO|penFile.|
|00001360| 63 72 65 61 74 6f 72 20 | 3d 20 68 65 61 64 65 72 |creator |= header|
|00001370| 46 69 6c 65 2e 4d 61 63 | 43 72 65 61 74 6f 72 00 |File.Mac|Creator.|
|00001380| 00 14 2f 2f 20 46 4f 52 | 20 53 4c 4f 57 20 4d 41 |..// FOR| SLOW MA|
|00001390| 43 48 49 4e 45 53 21 2f | 2f 20 63 6f 6d 6d 65 6e |CHINES!/|/ commen|
|000013a0| 74 20 6f 75 74 20 74 68 | 65 20 6e 65 78 74 20 74 |t out th|e next t|
|000013b0| 77 6f 20 6c 69 6e 65 73 | 2e 63 61 72 62 6f 6e 49 |wo lines|.carbonI|
|000013c0| 6e 66 6f 20 3d 20 46 69 | 6e 64 43 61 72 62 6f 6e |nfo = Fi|ndCarbon|
|000013d0| 49 6e 66 6f 28 54 42 43 | 61 6c 6c 4e 61 6d 65 45 |Info(TBC|allNameE|
|000013e0| 46 2e 74 65 78 74 29 22 | 52 57 69 6e 64 6f 77 2e |F.text)"|RWindow.|
|000013f0| 53 68 6f 77 43 61 72 62 | 6f 6e 49 6e 66 6f 28 63 |ShowCarb|onInfo(c|
|00001400| 61 72 62 6f 6e 49 6e 66 | 6f 29 00 1f 2f 2f 69 66 |arbonInf|o)..//if|
|00001410| 20 79 6f 75 20 77 61 6e | 74 20 73 70 65 65 64 20 | you wan|t speed |
|00001420| 62 65 6e 63 68 6d 61 72 | 6b 73 3a 20 2f 2f 6d 73 |benchmar|ks: //ms|
|00001430| 67 42 6f 78 20 73 74 72 | 28 74 69 63 6b 73 20 2d |gBox str|(ticks -|
|00001440| 20 73 65 61 72 63 68 54 | 69 6d 65 29 00 0e 52 57 | searchT|ime)..RW|
|00001450| 69 6e 64 6f 77 2e 73 68 | 6f 77 28 29 04 65 6c 73 |indow.sh|ow().els|
|00001460| 65 1d 53 68 6f 77 50 72 | 6f 67 72 65 73 73 43 6f |e.ShowPr|ogressCo|
|00001470| 6e 74 72 6f 6c 73 28 20 | 66 61 6c 73 65 20 29 06 |ntrols( |false ).|
|00001480| 65 6e 64 20 69 66 00 06 | 65 6e 64 20 69 66 00 1f |end if..|end if..|
|00001490| 45 78 63 65 70 74 69 6f | 6e 20 77 20 61 73 20 52 |Exceptio|n w as R|
|000014a0| 75 6e 74 69 6d 65 45 78 | 63 65 70 74 69 6f 6e 16 |untimeEx|ception.|
|000014b0| 69 66 20 52 57 69 6e 64 | 6f 77 20 3c 3e 20 6e 69 |if RWind|ow <> ni|
|000014c0| 6c 20 74 68 65 6e 0d 52 | 57 69 6e 64 6f 77 2e 63 |l then.R|Window.c|
|000014d0| 6c 6f 73 65 03 65 6e 64 | be 01 53 74 6f 70 41 6c |lose.end|..StopAl|
|000014e0| 65 72 74 28 20 22 4f 6f | 70 73 2e 22 20 2c 20 22 |ert( "Oo|ps." , "|
|000014f0| 54 68 65 72 65 27 73 20 | 73 6f 6d 65 74 68 69 6e |There's |somethin|
|00001500| 67 20 77 72 6f 6e 67 20 | 69 6e 20 54 42 46 69 6e |g wrong |in TBFin|
|00001510| 64 65 72 27 73 20 63 6f | 64 65 2e 20 59 6f 75 20 |der's co|de. You |
|00001520| 6d 61 79 20 77 61 6e 74 | 20 74 6f 20 61 73 6b 20 |may want| to ask |
|00001530| 73 6f 6d 65 6f 6e 65 20 | 74 6f 20 66 69 78 20 69 |someone |to fix i|
|00001540| 74 2e 20 4f 72 20 64 6f | 20 69 74 20 79 6f 75 72 |t. Or do| it your|
|00001550| 73 65 6c 66 2e 22 20 29 | 07 45 6e 64 20 53 75 62 |self." )|.End Sub|
|00001560| 00 07 07 52 65 73 69 7a | 65 64 01 00 01 00 03 0d |...Resiz|ed......|
|00001570| 53 75 62 20 52 65 73 69 | 7a 65 64 28 29 00 07 45 |Sub Resi|zed()..E|
|00001580| 6e 64 20 53 75 62 0b 43 | 61 6e 63 65 6c 43 6c 6f |nd Sub.C|ancelClo|
|00001590| 73 65 01 00 01 00 03 21 | 46 75 6e 63 74 69 6f 6e |se.....!|Function|
|000015a0| 20 43 61 6e 63 65 6c 43 | 6c 6f 73 65 28 29 20 41 | CancelC|lose() A|
|000015b0| 73 20 42 6f 6f 6c 65 61 | 6e 00 0c 45 6e 64 20 46 |s Boolea|n..End F|
|000015c0| 75 6e 63 74 69 6f 6e 05 | 43 6c 6f 73 65 05 17 05 |unction.|Close...|
|000015d0| 21 08 0b 53 75 62 20 43 | 6c 6f 73 65 28 29 0a 20 |!..Sub C|lose(). |
|000015e0| 2f 2f 20 6a 61 6b 6f 62 | 62 1f 41 70 70 2e 66 69 |// jakob|b.App.fi|
|000015f0| 6e 64 54 42 43 61 6c 6c | 57 4e 44 49 73 4f 70 65 |ndTBCall|WNDIsOpe|
|00001600| 6e 20 3d 20 46 61 6c 73 | 65 27 41 70 70 2e 45 6e |n = Fals|e'App.En|
|00001610| 61 62 6c 65 36 38 6b 4d | 65 6e 75 20 3d 20 41 70 |able68kM|enu = Ap|
|00001620| 70 2e 45 6e 61 62 6c 65 | 36 38 6b 4d 65 6e 75 2d |p.Enable|68kMenu-|
|00001630| 31 33 41 70 70 2e 70 72 | 65 66 73 2e 53 65 74 49 |13App.pr|efs.SetI|
|00001640| 6e 74 65 67 65 72 28 20 | 22 46 69 6e 64 54 42 43 |nteger( |"FindTBC|
|00001650| 61 6c 6c 57 4e 44 54 6f | 70 22 20 2c 20 6d 65 2e |allWNDTo|p" , me.|
|00001660| 74 6f 70 20 29 35 41 70 | 70 2e 70 72 65 66 73 2e |top )5Ap|p.prefs.|
|00001670| 53 65 74 49 6e 74 65 67 | 65 72 28 20 22 46 69 6e |SetInteg|er( "Fin|
|00001680| 64 54 42 43 61 6c 6c 57 | 4e 44 4c 65 66 74 22 20 |dTBCallW|NDLeft" |
|00001690| 2c 20 6d 65 2e 6c 65 66 | 74 20 29 11 41 70 70 2e |, me.lef|t ).App.|
|000016a0| 70 72 65 66 73 2e 43 6c | 6f 73 65 28 29 07 45 6e |prefs.Cl|ose().En|
|000016b0| 64 20 53 75 62 08 41 63 | 74 69 76 61 74 65 01 16 |d Sub.Ac|tivate..|
|000016c0| 01 00 03 0e 53 75 62 20 | 41 63 74 69 76 61 74 65 |....Sub |Activate|
|000016d0| 28 29 16 45 6e 61 62 6c | 65 43 6f 6e 74 72 6f 6c |().Enabl|eControl|
|000016e0| 73 28 20 74 72 75 65 20 | 29 07 45 6e 64 20 53 75 |s( true |).End Su|
|000016f0| 62 0a 44 65 61 63 74 69 | 76 61 74 65 01 15 01 15 |b.Deacti|vate....|
|00001700| 03 10 53 75 62 20 44 65 | 61 63 74 69 76 61 74 65 |..Sub De|activate|
|00001710| 28 29 17 45 6e 61 62 6c | 65 43 6f 6e 74 72 6f 6c |().Enabl|eControl|
|00001720| 73 28 20 66 61 6c 73 65 | 20 29 07 45 6e 64 20 53 |s( false| ).End S|
|00001730| 75 62 0f 45 6e 61 62 6c | 65 4d 65 6e 75 49 74 65 |ub.Enabl|eMenuIte|
|00001740| 6d 73 01 18 01 18 04 15 | 53 75 62 20 45 6e 61 62 |ms......|Sub Enab|
|00001750| 6c 65 4d 65 6e 75 49 74 | 65 6d 73 28 29 18 46 69 |leMenuIt|ems().Fi|
|00001760| 6c 65 43 6c 6f 73 65 2e | 65 6e 61 62 6c 65 64 20 |leClose.|enabled |
|00001770| 3d 20 74 72 75 65 1c 45 | 64 69 74 53 65 6c 65 63 |= true.E|ditSelec|
|00001780| 74 41 6c 6c 2e 65 6e 61 | 62 6c 65 64 20 3d 20 74 |tAll.ena|bled = t|
|00001790| 72 75 65 07 45 6e 64 20 | 53 75 62 04 4f 70 65 6e |rue.End |Sub.Open|
|000017a0| 10 0b 10 0b 1b 0a 53 75 | 62 20 4f 70 65 6e 28 29 |......Su|b Open()|
|000017b0| 09 2f 2f 20 6a 61 6b 6f | 62 62 12 64 69 6d 20 78 |.// jako|bb.dim x|
|000017c0| 2c 79 20 61 73 20 69 6e | 74 65 67 65 72 00 1c 69 |,y as in|teger..i|
|000017d0| 6e 69 74 74 65 64 20 3d | 20 46 41 4c 53 45 20 2f |nitted =| FALSE /|
|000017e0| 2f 20 61 6e 64 79 66 75 | 63 68 73 00 34 78 20 3d |/ andyfu|chs.4x =|
|000017f0| 20 41 70 70 2e 70 72 65 | 66 73 2e 47 65 74 49 6e | App.pre|fs.GetIn|
|00001800| 74 65 67 65 72 28 20 22 | 46 69 6e 64 54 42 43 61 |teger( "|FindTBCa|
|00001810| 6c 6c 57 4e 44 4c 65 66 | 74 22 20 2c 20 31 30 20 |llWNDLef|t" , 10 |
|00001820| 29 33 79 20 3d 20 41 70 | 70 2e 70 72 65 66 73 2e |)3y = Ap|p.prefs.|
|00001830| 47 65 74 49 6e 74 65 67 | 65 72 28 20 22 46 69 6e |GetInteg|er( "Fin|
|00001840| 64 54 42 43 61 6c 6c 57 | 4e 44 54 6f 70 22 20 2c |dTBCallW|NDTop" ,|
|00001850| 20 35 30 20 29 11 41 70 | 70 2e 70 72 65 66 73 2e | 50 ).Ap|p.prefs.|
|00001860| 43 6c 6f 73 65 28 29 00 | 39 2f 2f 20 74 6f 20 70 |Close().|9// to p|
|00001870| 72 65 76 65 6e 74 20 74 | 68 65 20 77 69 6e 64 6f |revent t|he windo|
|00001880| 77 20 66 6f 72 6d 20 68 | 61 76 69 6e 67 20 62 65 |w form h|aving be|
|00001890| 65 6e 20 6d 6f 76 65 64 | 20 6f 66 66 73 63 72 65 |en moved| offscre|
|000018a0| 65 6e 31 2f 2f 20 28 20 | 61 66 74 65 72 20 63 68 |en1// ( |after ch|
|000018b0| 61 6e 67 69 6e 67 20 74 | 68 65 20 73 63 72 65 65 |anging t|he scree|
|000018c0| 6e 73 20 72 65 73 6f 6c | 75 74 69 6f 6e 20 6f 72 |ns resol|ution or|
|000018d0| 20 c9 20 29 35 69 66 20 | 78 20 3e 3d 20 73 63 72 | . )5if |x >= scr|
|000018e0| 65 65 6e 28 30 29 2e 77 | 69 64 74 68 20 6f 72 20 |een(0).w|idth or |
|000018f0| 79 20 3e 3d 20 73 63 72 | 65 65 6e 28 30 29 2e 68 |y >= scr|een(0).h|
|00001900| 65 69 67 68 74 20 74 68 | 65 6e 0c 6d 65 2e 6c 65 |eight th|en.me.le|
|00001910| 66 74 20 3d 20 31 30 0b | 6d 65 2e 74 6f 70 20 3d |ft = 10.|me.top =|
|00001920| 20 35 30 04 65 6c 73 65 | 0b 6d 65 2e 6c 65 66 74 | 50.else|.me.left|
|00001930| 20 3d 20 78 0a 6d 65 2e | 74 6f 70 20 3d 20 79 06 | = x.me.|top = y.|
|00001940| 65 6e 64 20 69 66 00 1e | 41 70 70 2e 66 69 6e 64 |end if..|App.find|
|00001950| 54 42 43 61 6c 6c 57 4e | 44 49 73 4f 70 65 6e 20 |TBCallWN|DIsOpen |
|00001960| 3d 20 54 52 55 45 29 41 | 70 70 2e 45 6e 61 62 6c |= TRUE)A|pp.Enabl|
|00001970| 65 36 38 6b 4d 65 6e 75 | 20 3d 20 41 70 70 2e 45 |e68kMenu| = App.E|
|00001980| 6e 61 62 6c 65 36 38 6b | 4d 65 6e 75 20 2b 20 31 |nable68k|Menu + 1|
|00001990| 28 41 70 70 2e 53 65 74 | 36 38 6b 43 6f 64 65 44 |(App.Set|68kCodeD|
|000019a0| 69 73 70 6c 61 79 20 61 | 70 70 2e 69 6e 63 6c 75 |isplay a|pp.inclu|
|000019b0| 64 65 36 38 6b 43 6f 64 | 65 00 1b 69 6e 69 74 74 |de68kCod|e..initt|
|000019c0| 65 64 20 3d 20 54 52 55 | 45 20 2f 2f 20 61 6e 64 |ed = TRU|E // and|
|000019d0| 79 66 75 63 68 73 00 07 | 45 6e 64 20 53 75 62 02 |yfuchs..|End Sub.|
|000019e0| 0d 45 64 69 74 53 65 6c | 65 63 74 41 6c 6c 02 2f |.EditSel|ectAll./|
|000019f0| 02 2f 04 1a 46 75 6e 63 | 74 69 6f 6e 20 41 63 74 |./..Func|tion Act|
|00001a00| 69 6f 6e 20 41 73 20 42 | 6f 6f 6c 65 61 6e 19 54 |ion As B|oolean.T|
|00001a10| 42 43 61 6c 6c 4e 61 6d | 65 45 46 2e 53 65 6c 53 |BCallNam|eEF.SelS|
|00001a20| 74 61 72 74 20 3d 20 30 | 2f 54 42 43 61 6c 6c 4e |tart = 0|/TBCallN|
|00001a30| 61 6d 65 45 46 2e 53 65 | 6c 4c 65 6e 67 74 68 20 |ameEF.Se|lLength |
|00001a40| 3d 20 4c 65 6e 28 54 42 | 43 61 6c 6c 4e 61 6d 65 |= Len(TB|CallName|
|00001a50| 45 46 2e 74 65 78 74 29 | 0c 45 6e 64 20 46 75 6e |EF.text)|.End Fun|
|00001a60| 63 74 69 6f 6e 09 46 69 | 6c 65 43 6c 6f 73 65 01 |ction.Fi|leClose.|
|00001a70| 0c 01 0c 03 1a 46 75 6e | 63 74 69 6f 6e 20 41 63 |.....Fun|ction Ac|
|00001a80| 74 69 6f 6e 20 41 73 20 | 42 6f 6f 6c 65 61 6e 0c |tion As |Boolean.|
|00001a90| 73 65 6c 66 2e 63 6c 6f | 73 65 28 29 0c 45 6e 64 |self.clo|se().End|
|00001aa0| 20 46 75 6e 63 74 69 6f | 6e 00 0d 07 00 00 a8 01 | Functio|n.......|
|00001ab0| 08 47 72 6f 75 70 42 6f | 78 00 00 00 00 01 09 4d |.GroupBo|x......M|
|00001ac0| 6f 75 73 65 4d 6f 76 65 | 01 00 01 00 03 29 53 75 |ouseMove|.....)Su|
|00001ad0| 62 20 4d 6f 75 73 65 4d | 6f 76 65 28 58 20 41 73 |b MouseM|ove(X As|
|00001ae0| 20 49 6e 74 65 67 65 72 | 2c 20 59 20 41 73 20 49 | Integer|, Y As I|
|00001af0| 6e 74 65 67 65 72 29 00 | 07 45 6e 64 20 53 75 62 |nteger).|.End Sub|
|00001b00| 00 00 07 00 00 b4 01 0f | 43 53 74 61 74 69 63 54 |........|CStaticT|
|00001b10| 65 78 74 50 6c 75 73 00 | 00 00 00 00 00 00 07 00 |extPlus.|........|
|00001b20| 00 88 02 09 45 64 69 74 | 46 69 65 6c 64 00 00 00 |....Edit|Field...|
|00001b30| 00 06 09 53 65 6c 43 68 | 61 6e 67 65 01 00 01 00 |...SelCh|ange....|
|00001b40| 03 0f 53 75 62 20 53 65 | 6c 43 68 61 6e 67 65 28 |..Sub Se|lChange(|
|00001b50| 29 00 07 45 6e 64 20 53 | 75 62 04 4f 70 65 6e 01 |)..End S|ub.Open.|
|00001b60| 14 01 14 03 0a 53 75 62 | 20 4f 70 65 6e 28 29 21 |.....Sub| Open()!|
|00001b70| 53 65 61 72 63 68 42 54 | 4e 2e 65 6e 61 62 6c 65 |SearchBT|N.enable|
|00001b80| 64 20 3d 20 6d 65 2e 74 | 65 78 74 20 3c 3e 20 22 |d = me.t|ext <> "|
|00001b90| 22 07 45 6e 64 20 53 75 | 62 05 43 6c 6f 73 65 01 |".End Su|b.Close.|
|00001ba0| 00 01 00 03 0b 53 75 62 | 20 43 6c 6f 73 65 28 29 |.....Sub| Close()|
|00001bb0| 00 07 45 6e 64 20 53 75 | 62 09 4d 6f 75 73 65 4d |..End Su|b.MouseM|
|00001bc0| 6f 76 65 01 00 01 00 03 | 29 53 75 62 20 4d 6f 75 |ove.....|)Sub Mou|
|00001bd0| 73 65 4d 6f 76 65 28 58 | 20 41 73 20 49 6e 74 65 |seMove(X| As Inte|
|00001be0| 67 65 72 2c 20 59 20 41 | 73 20 49 6e 74 65 67 65 |ger, Y A|s Intege|
|00001bf0| 72 29 00 07 45 6e 64 20 | 53 75 62 0a 54 65 78 74 |r)..End |Sub.Text|
|00001c00| 43 68 61 6e 67 65 01 17 | 01 17 03 10 53 75 62 20 |Change..|....Sub |
|00001c10| 54 65 78 74 43 68 61 6e | 67 65 28 29 21 53 65 61 |TextChan|ge()!Sea|
|00001c20| 72 63 68 42 54 4e 2e 65 | 6e 61 62 6c 65 64 20 3d |rchBTN.e|nabled =|
|00001c30| 20 6d 65 2e 74 65 78 74 | 20 3c 3e 20 22 22 07 45 | me.text| <> "".E|
|00001c40| 6e 64 20 53 75 62 07 4b | 65 79 44 6f 77 6e 01 00 |nd Sub.K|eyDown..|
|00001c50| 01 00 03 2a 46 75 6e 63 | 74 69 6f 6e 20 4b 65 79 |...*Func|tion Key|
|00001c60| 44 6f 77 6e 28 4b 65 79 | 20 41 73 20 53 74 72 69 |Down(Key| As Stri|
|00001c70| 6e 67 29 20 41 73 20 42 | 6f 6f 6c 65 61 6e 00 0c |ng) As B|oolean..|
|00001c80| 45 6e 64 20 46 75 6e 63 | 74 69 6f 6e 00 00 07 00 |End Func|tion....|
|00001c90| 00 b4 01 0a 50 75 73 68 | 42 75 74 74 6f 6e 00 00 |....Push|Button..|
|00001ca0| 00 00 01 06 41 63 74 69 | 6f 6e 01 25 01 25 11 0c |....Acti|on.%.%..|
|00001cb0| 53 75 62 20 41 63 74 69 | 6f 6e 28 29 25 64 69 6d |Sub Acti|on()%dim|
|00001cc0| 20 55 48 46 6f 6c 64 65 | 72 2c 48 65 61 64 65 72 | UHFolde|r,Header|
|00001cd0| 46 69 6c 65 20 61 73 20 | 46 6f 6c 64 65 72 49 74 |File as |FolderIt|
|00001ce0| 65 6d 00 1b 69 66 20 4c | 69 6d 69 74 53 65 61 72 |em..if L|imitSear|
|00001cf0| 63 68 43 42 2e 76 61 6c | 75 65 20 74 68 65 6e 20 |chCB.val|ue then |
|00001d00| 55 48 46 6f 6c 64 65 72 | 20 3d 20 47 65 74 55 6e |UHFolder| = GetUn|
|00001d10| 69 76 65 72 73 61 6c 48 | 65 61 64 65 72 73 28 29 |iversalH|eaders()|
|00001d20| 17 69 66 20 55 48 46 6f | 6c 64 65 72 20 3c 3e 20 |.if UHFo|lder <> |
|00001d30| 4e 49 4c 20 74 68 65 6e | 2a 48 65 61 64 65 72 46 |NIL then|*HeaderF|
|00001d40| 69 6c 65 20 3d 20 55 48 | 46 6f 6c 64 65 72 2e 63 |ile = UH|Folder.c|
|00001d50| 68 69 6c 64 28 55 48 4c | 69 73 74 50 4d 2e 74 65 |hild(UHL|istPM.te|
|00001d60| 78 74 29 19 69 66 20 48 | 65 61 64 65 72 46 69 6c |xt).if H|eaderFil|
|00001d70| 65 2e 65 78 69 73 74 73 | 20 74 68 65 6e 17 44 6f |e.exists| then.Do|
|00001d80| 54 68 65 53 65 61 72 63 | 68 28 48 65 61 64 65 72 |TheSearc|h(Header|
|00001d90| 46 69 6c 65 29 04 65 6c | 73 65 bb 01 53 74 6f 70 |File).el|se..Stop|
|00001da0| 41 6c 65 72 74 28 22 54 | 68 65 20 63 6f 6e 74 65 |Alert("T|he conte|
|00001db0| 6e 74 20 6f 66 20 74 68 | 65 20 55 6e 69 76 65 72 |nt of th|e Univer|
|00001dc0| 61 6c 20 48 65 61 64 65 | 72 73 20 66 6f 6c 64 65 |al Heade|rs folde|
|00001dd0| 72 20 73 65 65 6d 73 20 | 74 6f 20 68 61 76 65 20 |r seems |to have |
|00001de0| 63 68 61 6e 67 65 64 2e | 20 49 20 63 61 6e 27 74 |changed.| I can't|
|00001df0| 20 66 69 6e 64 20 74 68 | 65 20 72 65 71 75 65 73 | find th|e reques|
|00001e00| 74 65 64 20 68 65 61 64 | 65 72 20 66 69 6c 65 2e |ted head|er file.|
|00001e10| 22 2c 4e 55 4c 4c 29 03 | 65 6e 64 03 65 6e 64 04 |",NULL).|end.end.|
|00001e20| 65 6c 73 65 0f 44 6f 54 | 68 65 53 65 61 72 63 68 |else.DoT|heSearch|
|00001e30| 20 4e 49 4c 03 65 6e 64 | 07 45 6e 64 20 53 75 62 | NIL.end|.End Sub|
|00001e40| 00 00 07 00 00 ac 01 06 | 42 54 63 61 6e 76 00 00 |........|BTcanv..|
|00001e50| 00 00 02 09 4d 6f 75 73 | 65 44 6f 77 6e 01 00 01 |....Mous|eDown...|
|00001e60| 00 03 39 46 75 6e 63 74 | 69 6f 6e 20 4d 6f 75 73 |..9Funct|ion Mous|
|00001e70| 65 44 6f 77 6e 28 58 20 | 41 73 20 49 6e 74 65 67 |eDown(X |As Integ|
|00001e80| 65 72 2c 20 59 20 41 73 | 20 49 6e 74 65 67 65 72 |er, Y As| Integer|
|00001e90| 29 20 41 73 20 42 6f 6f | 6c 65 61 6e 00 0c 45 6e |) As Boo|lean..En|
|00001ea0| 64 20 46 75 6e 63 74 69 | 6f 6e 05 50 61 69 6e 74 |d Functi|on.Paint|
|00001eb0| 01 00 01 00 03 18 53 75 | 62 20 50 61 69 6e 74 28 |......Su|b Paint(|
|00001ec0| 67 20 41 73 20 47 72 61 | 70 68 69 63 73 29 00 07 |g As Gra|phics)..|
|00001ed0| 45 6e 64 20 53 75 62 00 | 00 07 00 00 a4 01 0d 43 |End Sub.|.......C|
|00001ee0| 68 61 73 69 6e 67 41 72 | 72 6f 77 73 00 00 00 00 |hasingAr|rows....|
|00001ef0| 01 09 4d 6f 75 73 65 4d | 6f 76 65 01 00 01 00 03 |..MouseM|ove.....|
|00001f00| 29 53 75 62 20 4d 6f 75 | 73 65 4d 6f 76 65 28 58 |)Sub Mou|seMove(X|
|00001f10| 20 41 73 20 49 6e 74 65 | 67 65 72 2c 20 59 20 41 | As Inte|ger, Y A|
|00001f20| 73 20 49 6e 74 65 67 65 | 72 29 00 07 45 6e 64 20 |s Intege|r)..End |
|00001f30| 53 75 62 00 00 07 00 00 | b4 01 0a 53 74 61 74 69 |Sub.....|...Stati|
|00001f40| 63 54 65 78 74 00 00 00 | 00 00 00 00 07 00 00 b4 |cText...|........|
|00001f50| 01 0a 53 74 61 74 69 63 | 54 65 78 74 00 00 00 00 |..Static|Text....|
|00001f60| 00 00 00 07 00 00 a4 01 | 0d 53 65 70 61 72 61 74 |........|.Separat|
|00001f70| 6f 72 50 6c 75 73 00 00 | 00 00 00 00 00 07 00 00 |orPlus..|........|
|00001f80| b4 01 0a 50 75 73 68 42 | 75 74 74 6f 6e 00 00 00 |...PushB|utton...|
|00001f90| 00 01 06 41 63 74 69 6f | 6e 02 2f 02 2f 06 0c 53 |...Actio|n././..S|
|00001fa0| 75 62 20 41 63 74 69 6f | 6e 28 29 80 01 2f 2f 20 |ub Actio|n()..// |
|00001fb0| 49 20 6d 61 64 65 20 74 | 68 69 73 20 61 20 67 6c |I made t|his a gl|
|00001fc0| 6f 62 61 6c 20 6d 65 74 | 68 6f 64 20 28 69 6e 20 |obal met|hod (in |
|00001fd0| 4d 47 6c 6f 62 61 6c 73 | 29 20 62 65 63 61 75 73 |MGlobals|) becaus|
|00001fe0| 65 20 49 20 6e 65 65 64 | 65 64 20 74 6f 2f 2f 2f |e I need|ed to///|
|00001ff0| 20 64 6f 20 74 68 69 73 | 20 66 6f 72 20 74 68 65 | do this| for the|
|00002000| 20 63 6f 72 72 65 73 70 | 6f 6e 64 69 6e 67 20 6d | corresp|onding m|
|00002010| 65 6e 75 20 69 74 65 6d | 20 74 6f 6f 2e 00 0d 42 |enu item| too...B|
|00002020| 72 6f 77 73 65 48 65 61 | 64 65 72 73 07 45 6e 64 |rowseHea|ders.End|
|00002030| 20 53 75 62 00 00 07 00 | 00 80 02 08 43 68 65 63 | Sub....|....Chec|
|00002040| 6b 42 6f 78 00 00 00 00 | 03 05 43 6c 6f 73 65 01 |kBox....|..Close.|
|00002050| 00 01 00 03 0b 53 75 62 | 20 43 6c 6f 73 65 28 29 |.....Sub| Close()|
|00002060| 00 07 45 6e 64 20 53 75 | 62 04 4f 70 65 6e 01 00 |..End Su|b.Open..|
|00002070| 01 00 03 0a 53 75 62 20 | 4f 70 65 6e 28 29 00 07 |....Sub |Open()..|
|00002080| 45 6e 64 20 53 75 62 06 | 41 63 74 69 6f 6e 01 1c |End Sub.|Action..|
|00002090| 01 1c 05 0c 53 75 62 20 | 41 63 74 69 6f 6e 28 29 |....Sub |Action()|
|000020a0| 1c 69 66 20 69 6e 69 74 | 74 65 64 20 74 68 65 6e |.if init|ted then|
|000020b0| 20 2f 2f 20 61 6e 64 79 | 66 75 63 68 73 1e 41 70 | // andy|fuchs.Ap|
|000020c0| 70 2e 53 65 74 36 38 6b | 43 6f 64 65 44 69 73 70 |p.Set68k|CodeDisp|
|000020d0| 6c 61 79 20 6d 65 2e 76 | 61 6c 75 65 06 65 6e 64 |lay me.v|alue.end|
|000020e0| 20 69 66 07 45 6e 64 20 | 53 75 62 00 00 07 00 00 | if.End |Sub.....|
|000020f0| 80 02 08 43 68 65 63 6b | 42 6f 78 00 00 00 00 01 |...Check|Box.....|
|00002100| 06 41 63 74 69 6f 6e 01 | 1b 01 1b 03 0c 53 75 62 |.Action.|.....Sub|
|00002110| 20 41 63 74 69 6f 6e 28 | 29 1b 55 48 4c 69 73 74 | Action(|).UHList|
|00002120| 50 4d 2e 65 6e 61 62 6c | 65 64 20 3d 20 6d 65 2e |PM.enabl|ed = me.|
|00002130| 76 61 6c 75 65 07 45 6e | 64 20 53 75 62 00 00 07 |value.En|d Sub...|
|00002140| 00 00 b4 01 09 50 6f 70 | 75 70 4d 65 6e 75 00 00 |.....Pop|upMenu..|
|00002150| 00 00 03 09 4d 6f 75 73 | 65 45 78 69 74 01 00 01 |....Mous|eExit...|
|00002160| 00 03 0f 53 75 62 20 4d | 6f 75 73 65 45 78 69 74 |...Sub M|ouseExit|
|00002170| 28 29 00 07 45 6e 64 20 | 53 75 62 04 4f 70 65 6e |()..End |Sub.Open|
|00002180| 0d 00 0d 09 13 0a 53 75 | 62 20 4f 70 65 6e 28 29 |......Su|b Open()|
|00002190| 1a 64 69 6d 20 55 48 46 | 6f 6c 64 65 72 20 61 73 |.dim UHF|older as|
|000021a0| 20 46 6f 6c 64 65 72 49 | 74 65 6d 13 64 69 6d 20 | FolderI|tem.dim |
|000021b0| 69 2c 20 63 20 61 73 20 | 69 6e 74 65 67 65 72 00 |i, c as |integer.|
|000021c0| 20 55 48 46 6f 6c 64 65 | 72 20 3d 20 47 65 74 55 | UHFolde|r = GetU|
|000021d0| 6e 69 76 65 72 73 61 6c | 48 65 61 64 65 72 73 28 |niversal|Headers(|
|000021e0| 29 17 69 66 20 55 48 46 | 6f 6c 64 65 72 20 3c 3e |).if UHF|older <>|
|000021f0| 20 4e 49 4c 20 74 68 65 | 6e 1e 63 20 3d 20 55 48 | NIL the|n.c = UH|
|00002200| 46 6f 6c 64 65 72 2e 43 | 6f 75 6e 74 20 2f 2f 67 |Folder.C|ount //g|
|00002210| 75 69 6c 6c 61 75 6d 65 | 0e 66 6f 72 20 69 20 3d |uillaume|.for i =|
|00002220| 20 31 20 74 6f 20 63 20 | 6d 65 2e 61 64 64 52 6f | 1 to c |me.addRo|
|00002230| 77 28 55 48 46 6f 6c 64 | 65 72 2e 69 74 65 6d 28 |w(UHFold|er.item(|
|00002240| 69 29 2e 6e 61 6d 65 29 | 04 6e 65 78 74 10 6d 65 |i).name)|.next.me|
|00002250| 2e 4c 69 73 74 49 6e 64 | 65 78 20 3d 20 30 12 6d |.ListInd|ex = 0.m|
|00002260| 65 2e 65 6e 61 62 6c 65 | 64 20 3d 20 66 61 6c 73 |e.enable|d = fals|
|00002270| 65 04 65 6c 73 65 93 01 | 53 74 6f 70 41 6c 65 72 |e.else..|StopAler|
|00002280| 74 28 22 59 6f 75 20 6e | 65 65 64 20 55 6e 69 76 |t("You n|eed Univ|
|00002290| 65 72 73 61 6c 20 48 65 | 61 64 65 72 73 20 74 6f |ersal He|aders to|
|000022a0| 20 72 75 6e 20 74 68 69 | 73 20 61 70 70 6c 69 63 | run thi|s applic|
|000022b0| 61 74 69 6f 6e 2e 22 2c | 20 4e 55 4c 4c 29 20 2f |ation.",| NULL) /|
|000022c0| 2f 20 67 75 69 6c 6c 61 | 75 6d 65 0a 61 70 70 2e |/ guilla|ume.app.|
|000022d0| 51 75 69 74 28 29 03 65 | 6e 64 00 12 6d 65 2e 65 |Quit().e|nd..me.e|
|000022e0| 6e 61 62 6c 65 64 20 3d | 20 66 61 6c 73 65 07 45 |nabled =| false.E|
|000022f0| 6e 64 20 53 75 62 06 43 | 68 61 6e 67 65 01 00 01 |nd Sub.C|hange...|
|00002300| 00 03 0c 53 75 62 20 43 | 68 61 6e 67 65 28 29 00 |...Sub C|hange().|
|00002310| 07 45 6e 64 20 53 75 62 | 00 00 0d 06 43 61 6e 76 |.End Sub|....Canv|
|00002320| 61 73 10 04 4e 61 6d 65 | 08 42 47 43 61 6e 76 61 |as..Name|.BGCanva|
|00002330| 73 05 49 6e 64 65 78 0b | 2d 32 31 34 37 34 38 33 |s.Index.|-2147483|
|00002340| 36 34 38 0d 54 61 62 50 | 61 6e 65 6c 49 6e 64 65 |648.TabP|anelInde|
|00002350| 78 01 30 07 56 69 73 69 | 62 6c 65 04 54 72 75 65 |x.0.Visi|ble.True|
|00002360| 04 4c 65 66 74 02 2d 32 | 03 54 6f 70 01 30 05 57 |.Left.-2|.Top.0.W|
|00002370| 69 64 74 68 02 33 31 06 | 48 65 69 67 68 74 03 31 |idth.31.|Height.1|
|00002380| 36 38 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |68.Ballo|onHelp..|
|00002390| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|000023a0| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 04 54 72 |elp..Loc|kLeft.Tr|
|000023b0| 75 65 07 4c 6f 63 6b 54 | 6f 70 04 54 72 75 65 09 |ue.LockT|op.True.|
|000023c0| 4c 6f 63 6b 52 69 67 68 | 74 05 46 61 6c 73 65 0a |LockRigh|t.False.|
|000023d0| 4c 6f 63 6b 42 6f 74 74 | 6f 6d 04 54 72 75 65 08 |LockBott|om.True.|
|000023e0| 42 61 63 6b 64 72 6f 70 | 01 30 07 45 6e 61 62 6c |Backdrop|.0.Enabl|
|000023f0| 65 64 04 54 72 75 65 04 | 08 47 72 6f 75 70 42 6f |ed.True.|.GroupBo|
|00002400| 78 15 04 4e 61 6d 65 07 | 51 75 65 72 79 47 42 05 |x..Name.|QueryGB.|
|00002410| 49 6e 64 65 78 0b 2d 32 | 31 34 37 34 38 33 36 34 |Index.-2|14748364|
|00002420| 38 0d 54 61 62 50 61 6e | 65 6c 49 6e 64 65 78 01 |8.TabPan|elIndex.|
|00002430| 30 07 56 69 73 69 62 6c | 65 04 54 72 75 65 04 4c |0.Visibl|e.True.L|
|00002440| 65 66 74 02 33 33 03 54 | 6f 70 02 31 33 05 57 69 |eft.33.T|op.13.Wi|
|00002450| 64 74 68 03 33 31 39 06 | 48 65 69 67 68 74 03 31 |dth.319.|Height.1|
|00002460| 30 36 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |06.Ballo|onHelp..|
|00002470| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00002480| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 04 54 72 |elp..Loc|kLeft.Tr|
|00002490| 75 65 07 4c 6f 63 6b 54 | 6f 70 05 46 61 6c 73 65 |ue.LockT|op.False|
|000024a0| 09 4c 6f 63 6b 52 69 67 | 68 74 04 54 72 75 65 0a |.LockRig|ht.True.|
|000024b0| 4c 6f 63 6b 42 6f 74 74 | 6f 6d 05 46 61 6c 73 65 |LockBott|om.False|
|000024c0| 08 54 65 78 74 46 6f 6e | 74 06 53 79 73 74 65 6d |.TextFon|t.System|
|000024d0| 08 54 65 78 74 53 69 7a | 65 02 31 32 04 42 6f 6c |.TextSiz|e.12.Bol|
|000024e0| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|000024f0| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|00002500| 61 6c 73 65 07 43 61 70 | 74 69 6f 6e 05 51 75 65 |alse.Cap|tion.Que|
|00002510| 72 79 07 45 6e 61 62 6c | 65 64 04 54 72 75 65 00 |ry.Enabl|ed.True.|
|00002520| 0a 53 74 61 74 69 63 54 | 65 78 74 17 04 4e 61 6d |.StaticT|ext..Nam|
|00002530| 65 0d 54 42 43 61 6c 6c | 4e 61 6d 65 4c 42 4c 05 |e.TBCall|NameLBL.|
|00002540| 49 6e 64 65 78 0b 2d 32 | 31 34 37 34 38 33 36 34 |Index.-2|14748364|
|00002550| 38 0d 54 61 62 50 61 6e | 65 6c 49 6e 64 65 78 01 |8.TabPan|elIndex.|
|00002560| 30 07 56 69 73 69 62 6c | 65 04 54 72 75 65 04 4c |0.Visibl|e.True.L|
|00002570| 65 66 74 02 34 36 03 54 | 6f 70 02 34 30 05 57 69 |eft.46.T|op.40.Wi|
|00002580| 64 74 68 03 31 30 30 06 | 48 65 69 67 68 74 02 31 |dth.100.|Height.1|
|00002590| 32 0b 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 13 44 |2.Balloo|nHelp..D|
|000025a0| 69 73 61 62 6c 65 64 42 | 61 6c 6c 6f 6f 6e 48 65 |isabledB|alloonHe|
|000025b0| 6c 70 00 08 4c 6f 63 6b | 4c 65 66 74 05 46 61 6c |lp..Lock|Left.Fal|
|000025c0| 73 65 07 4c 6f 63 6b 54 | 6f 70 05 46 61 6c 73 65 |se.LockT|op.False|
|000025d0| 09 4c 6f 63 6b 52 69 67 | 68 74 05 46 61 6c 73 65 |.LockRig|ht.False|
|000025e0| 0a 4c 6f 63 6b 42 6f 74 | 74 6f 6d 05 46 61 6c 73 |.LockBot|tom.Fals|
|000025f0| 65 08 54 65 78 74 46 6f | 6e 74 06 47 65 6e 65 76 |e.TextFo|nt.Genev|
|00002600| 61 08 54 65 78 74 53 69 | 7a 65 01 39 04 42 6f 6c |a.TextSi|ze.9.Bol|
|00002610| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|00002620| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|00002630| 61 6c 73 65 04 54 65 78 | 74 15 4e 61 6d 65 20 6f |alse.Tex|t.Name o|
|00002640| 66 20 54 6f 6f 6c 62 6f | 78 20 63 61 6c 6c 3a 09 |f Toolbo|x call:.|
|00002650| 54 65 78 74 41 6c 69 67 | 6e 01 30 09 54 65 78 74 |TextAlig|n.0.Text|
|00002660| 43 6f 6c 6f 72 01 30 09 | 4d 75 6c 74 69 4c 69 6e |Color.0.|MultiLin|
|00002670| 65 05 46 61 6c 73 65 01 | 09 45 64 69 74 46 69 65 |e.False.|.EditFie|
|00002680| 6c 64 20 04 4e 61 6d 65 | 0c 54 42 43 61 6c 6c 4e |ld .Name|.TBCallN|
|00002690| 61 6d 65 45 46 05 49 6e | 64 65 78 0b 2d 32 31 34 |ameEF.In|dex.-214|
|000026a0| 37 34 38 33 36 34 38 0d | 54 61 62 50 61 6e 65 6c |7483648.|TabPanel|
|000026b0| 49 6e 64 65 78 01 30 07 | 56 69 73 69 62 6c 65 04 |Index.0.|Visible.|
|000026c0| 54 72 75 65 04 4c 65 66 | 74 03 31 35 31 03 54 6f |True.Lef|t.151.To|
|000026d0| 70 02 33 37 05 57 69 64 | 74 68 03 31 38 39 06 48 |p.37.Wid|th.189.H|
|000026e0| 65 69 67 68 74 02 31 38 | 0b 42 61 6c 6c 6f 6f 6e |eight.18|.Balloon|
|000026f0| 48 65 6c 70 00 13 44 69 | 73 61 62 6c 65 64 42 61 |Help..Di|sabledBa|
|00002700| 6c 6c 6f 6f 6e 48 65 6c | 70 00 08 4c 6f 63 6b 4c |lloonHel|p..LockL|
|00002710| 65 66 74 04 54 72 75 65 | 07 4c 6f 63 6b 54 6f 70 |eft.True|.LockTop|
|00002720| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|00002730| 04 54 72 75 65 0a 4c 6f | 63 6b 42 6f 74 74 6f 6d |.True.Lo|ckBottom|
|00002740| 05 46 61 6c 73 65 08 54 | 65 78 74 46 6f 6e 74 06 |.False.T|extFont.|
|00002750| 47 65 6e 65 76 61 08 54 | 65 78 74 53 69 7a 65 01 |Geneva.T|extSize.|
|00002760| 39 04 42 6f 6c 64 05 46 | 61 6c 73 65 06 49 74 61 |9.Bold.F|alse.Ita|
|00002770| 6c 69 63 05 46 61 6c 73 | 65 09 55 6e 64 65 72 6c |lic.Fals|e.Underl|
|00002780| 69 6e 65 05 46 61 6c 73 | 65 06 42 6f 72 64 65 72 |ine.Fals|e.Border|
|00002790| 04 54 72 75 65 09 4d 75 | 6c 74 69 4c 69 6e 65 05 |.True.Mu|ltiLine.|
|000027a0| 46 61 6c 73 65 09 53 63 | 72 6f 6c 6c 42 61 72 04 |False.Sc|rollBar.|
|000027b0| 54 72 75 65 06 53 74 79 | 6c 65 64 05 46 61 6c 73 |True.Sty|led.Fals|
|000027c0| 65 08 50 61 73 73 77 6f | 72 64 05 46 61 6c 73 65 |e.Passwo|rd.False|
|000027d0| 0c 55 73 65 46 6f 63 75 | 73 52 69 6e 67 04 54 72 |.UseFocu|sRing.Tr|
|000027e0| 75 65 08 52 65 61 64 4f | 6e 6c 79 05 46 61 6c 73 |ue.ReadO|nly.Fals|
|000027f0| 65 09 4c 69 6d 69 74 54 | 65 78 74 01 30 0a 41 63 |e.LimitT|ext.0.Ac|
|00002800| 63 65 70 74 54 61 62 73 | 05 46 61 6c 73 65 09 54 |ceptTabs|.False.T|
|00002810| 65 78 74 43 6f 6c 6f 72 | 01 30 09 42 61 63 6b 43 |extColor|.0.BackC|
|00002820| 6f 6c 6f 72 08 31 36 37 | 37 37 32 31 35 07 45 6e |olor.167|77215.En|
|00002830| 61 62 6c 65 64 04 54 72 | 75 65 04 54 65 78 74 00 |abled.Tr|ue.Text.|
|00002840| 02 0a 50 75 73 68 42 75 | 74 74 6f 6e 17 04 4e 61 |..PushBu|tton..Na|
|00002850| 6d 65 09 53 65 61 72 63 | 68 42 54 4e 05 49 6e 64 |me.Searc|hBTN.Ind|
|00002860| 65 78 0b 2d 32 31 34 37 | 34 38 33 36 34 38 0d 54 |ex.-2147|483648.T|
|00002870| 61 62 50 61 6e 65 6c 49 | 6e 64 65 78 01 30 07 56 |abPanelI|ndex.0.V|
|00002880| 69 73 69 62 6c 65 04 54 | 72 75 65 04 4c 65 66 74 |isible.T|rue.Left|
|00002890| 03 32 38 39 03 54 6f 70 | 03 31 33 37 05 57 69 64 |.289.Top|.137.Wid|
|000028a0| 74 68 02 36 30 06 48 65 | 69 67 68 74 02 32 30 0b |th.60.He|ight.20.|
|000028b0| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 13 44 69 73 |BalloonH|elp..Dis|
|000028c0| 61 62 6c 65 64 42 61 6c | 6c 6f 6f 6e 48 65 6c 70 |abledBal|loonHelp|
|000028d0| 00 08 4c 6f 63 6b 4c 65 | 66 74 05 46 61 6c 73 65 |..LockLe|ft.False|
|000028e0| 07 4c 6f 63 6b 54 6f 70 | 05 46 61 6c 73 65 09 4c |.LockTop|.False.L|
|000028f0| 6f 63 6b 52 69 67 68 74 | 04 54 72 75 65 0a 4c 6f |ockRight|.True.Lo|
|00002900| 63 6b 42 6f 74 74 6f 6d | 04 54 72 75 65 08 54 65 |ckBottom|.True.Te|
|00002910| 78 74 46 6f 6e 74 06 53 | 79 73 74 65 6d 08 54 65 |xtFont.S|ystem.Te|
|00002920| 78 74 53 69 7a 65 02 31 | 32 04 42 6f 6c 64 05 46 |xtSize.1|2.Bold.F|
|00002930| 61 6c 73 65 06 49 74 61 | 6c 69 63 05 46 61 6c 73 |alse.Ita|lic.Fals|
|00002940| 65 09 55 6e 64 65 72 6c | 69 6e 65 05 46 61 6c 73 |e.Underl|ine.Fals|
|00002950| 65 07 43 61 70 74 69 6f | 6e 06 53 65 61 72 63 68 |e.Captio|n.Search|
|00002960| 07 44 65 66 61 75 6c 74 | 04 54 72 75 65 06 43 61 |.Default|.True.Ca|
|00002970| 6e 63 65 6c 05 46 61 6c | 73 65 07 45 6e 61 62 6c |ncel.Fal|se.Enabl|
|00002980| 65 64 04 54 72 75 65 03 | 08 43 68 65 63 6b 42 6f |ed.True.|.CheckBo|
|00002990| 78 16 04 4e 61 6d 65 0c | 57 69 74 68 36 38 4b 43 |x..Name.|With68KC|
|000029a0| 68 65 63 6b 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |heck.Ind|ex.-2147|
|000029b0| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|000029c0| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|000029d0| 72 75 65 04 4c 65 66 74 | 03 31 35 31 03 54 6f 70 |rue.Left|.151.Top|
|000029e0| 02 36 32 05 57 69 64 74 | 68 03 31 38 39 06 48 65 |.62.Widt|h.189.He|
|000029f0| 69 67 68 74 02 31 38 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.18.|BalloonH|
|00002a00| 65 6c 70 25 52 65 71 75 | 69 72 65 73 20 52 42 20 |elp%Requ|ires RB |
|00002a10| 32 2e 31 20 6f 72 20 68 | 69 67 68 65 72 20 74 6f |2.1 or h|igher to|
|00002a20| 20 63 6f 6d 70 69 6c 65 | 21 13 44 69 73 61 62 6c | compile|!.Disabl|
|00002a30| 65 64 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 08 4c |edBalloo|nHelp..L|
|00002a40| 6f 63 6b 4c 65 66 74 04 | 54 72 75 65 07 4c 6f 63 |ockLeft.|True.Loc|
|00002a50| 6b 54 6f 70 04 54 72 75 | 65 09 4c 6f 63 6b 52 69 |kTop.Tru|e.LockRi|
|00002a60| 67 68 74 05 46 61 6c 73 | 65 0a 4c 6f 63 6b 42 6f |ght.Fals|e.LockBo|
|00002a70| 74 74 6f 6d 05 46 61 6c | 73 65 08 54 65 78 74 46 |ttom.Fal|se.TextF|
|00002a80| 6f 6e 74 06 47 65 6e 65 | 76 61 08 54 65 78 74 53 |ont.Gene|va.TextS|
|00002a90| 69 7a 65 01 39 04 42 6f | 6c 64 05 46 61 6c 73 65 |ize.9.Bo|ld.False|
|00002aa0| 06 49 74 61 6c 69 63 05 | 46 61 6c 73 65 09 55 6e |.Italic.|False.Un|
|00002ab0| 64 65 72 6c 69 6e 65 05 | 46 61 6c 73 65 07 43 61 |derline.|False.Ca|
|00002ac0| 70 74 69 6f 6e 24 49 6e | 63 6c 75 64 65 20 36 38 |ption$In|clude 68|
|00002ad0| 6b 20 63 6f 64 65 20 28 | 66 6f 72 20 52 45 41 4c |k code (|for REAL|
|00002ae0| 62 61 73 69 63 20 32 2e | 31 29 05 56 61 6c 75 65 |basic 2.|1).Value|
|00002af0| 05 46 61 6c 73 65 07 45 | 6e 61 62 6c 65 64 04 54 |.False.E|nabled.T|
|00002b00| 72 75 65 0a 0d 43 68 61 | 73 69 6e 67 41 72 72 6f |rue..Cha|singArro|
|00002b10| 77 73 0e 04 4e 61 6d 65 | 08 43 41 53 65 61 72 63 |ws..Name|.CASearc|
|00002b20| 68 05 49 6e 64 65 78 0b | 2d 32 31 34 37 34 38 33 |h.Index.|-2147483|
|00002b30| 36 34 38 0d 54 61 62 50 | 61 6e 65 6c 49 6e 64 65 |648.TabP|anelInde|
|00002b40| 78 01 30 07 56 69 73 69 | 62 6c 65 05 46 61 6c 73 |x.0.Visi|ble.Fals|
|00002b50| 65 04 4c 65 66 74 02 33 | 33 03 54 6f 70 03 31 33 |e.Left.3|3.Top.13|
|00002b60| 31 05 57 69 64 74 68 02 | 31 36 06 48 65 69 67 68 |1.Width.|16.Heigh|
|00002b70| 74 02 31 36 0b 42 61 6c | 6c 6f 6f 6e 48 65 6c 70 |t.16.Bal|loonHelp|
|00002b80| 00 13 44 69 73 61 62 6c | 65 64 42 61 6c 6c 6f 6f |..Disabl|edBalloo|
|00002b90| 6e 48 65 6c 70 00 08 4c | 6f 63 6b 4c 65 66 74 05 |nHelp..L|ockLeft.|
|00002ba0| 46 61 6c 73 65 07 4c 6f | 63 6b 54 6f 70 05 46 61 |False.Lo|ckTop.Fa|
|00002bb0| 6c 73 65 09 4c 6f 63 6b | 52 69 67 68 74 05 46 61 |lse.Lock|Right.Fa|
|00002bc0| 6c 73 65 0a 4c 6f 63 6b | 42 6f 74 74 6f 6d 04 54 |lse.Lock|Bottom.T|
|00002bd0| 72 75 65 05 0a 53 74 61 | 74 69 63 54 65 78 74 17 |rue..Sta|ticText.|
|00002be0| 04 4e 61 6d 65 0d 53 54 | 53 65 61 72 63 68 4c 61 |.Name.ST|SearchLa|
|00002bf0| 62 65 6c 05 49 6e 64 65 | 78 0b 2d 32 31 34 37 34 |bel.Inde|x.-21474|
|00002c00| 38 33 36 34 38 0d 54 61 | 62 50 61 6e 65 6c 49 6e |83648.Ta|bPanelIn|
|00002c10| 64 65 78 01 30 07 56 69 | 73 69 62 6c 65 05 46 61 |dex.0.Vi|sible.Fa|
|00002c20| 6c 73 65 04 4c 65 66 74 | 02 35 35 03 54 6f 70 03 |lse.Left|.55.Top.|
|00002c30| 31 33 31 05 57 69 64 74 | 68 03 31 31 32 06 48 65 |131.Widt|h.112.He|
|00002c40| 69 67 68 74 02 31 36 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.16.|BalloonH|
|00002c50| 65 6c 70 00 13 44 69 73 | 61 62 6c 65 64 42 61 6c |elp..Dis|abledBal|
|00002c60| 6c 6f 6f 6e 48 65 6c 70 | 00 08 4c 6f 63 6b 4c 65 |loonHelp|..LockLe|
|00002c70| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|00002c80| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|00002c90| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|00002ca0| 6d 04 54 72 75 65 08 54 | 65 78 74 46 6f 6e 74 06 |m.True.T|extFont.|
|00002cb0| 53 79 73 74 65 6d 08 54 | 65 78 74 53 69 7a 65 02 |System.T|extSize.|
|00002cc0| 31 32 04 42 6f 6c 64 05 | 46 61 6c 73 65 06 49 74 |12.Bold.|False.It|
|00002cd0| 61 6c 69 63 05 46 61 6c | 73 65 09 55 6e 64 65 72 |alic.Fal|se.Under|
|00002ce0| 6c 69 6e 65 05 46 61 6c | 73 65 04 54 65 78 74 0c |line.Fal|se.Text.|
|00002cf0| 53 65 61 72 63 68 69 6e | 67 2e 2e 2e 09 54 65 78 |Searchin|g....Tex|
|00002d00| 74 41 6c 69 67 6e 01 30 | 09 54 65 78 74 43 6f 6c |tAlign.0|.TextCol|
|00002d10| 6f 72 01 30 09 4d 75 6c | 74 69 4c 69 6e 65 05 46 |or.0.Mul|tiLine.F|
|00002d20| 61 6c 73 65 06 0a 53 74 | 61 74 69 63 54 65 78 74 |alse..St|aticText|
|00002d30| 17 04 4e 61 6d 65 10 53 | 54 53 65 61 72 63 68 53 |..Name.S|TSearchS|
|00002d40| 75 62 4c 61 62 65 6c 05 | 49 6e 64 65 78 0b 2d 32 |ubLabel.|Index.-2|
|00002d50| 31 34 37 34 38 33 36 34 | 38 0d 54 61 62 50 61 6e |14748364|8.TabPan|
|00002d60| 65 6c 49 6e 64 65 78 01 | 30 07 56 69 73 69 62 6c |elIndex.|0.Visibl|
|00002d70| 65 05 46 61 6c 73 65 04 | 4c 65 66 74 02 35 36 03 |e.False.|Left.56.|
|00002d80| 54 6f 70 03 31 34 37 05 | 57 69 64 74 68 03 31 35 |Top.147.|Width.15|
|00002d90| 31 06 48 65 69 67 68 74 | 02 31 32 0b 42 61 6c 6c |1.Height|.12.Ball|
|00002da0| 6f 6f 6e 48 65 6c 70 00 | 13 44 69 73 61 62 6c 65 |oonHelp.|.Disable|
|00002db0| 64 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 08 4c 6f |dBalloon|Help..Lo|
|00002dc0| 63 6b 4c 65 66 74 05 46 | 61 6c 73 65 07 4c 6f 63 |ckLeft.F|alse.Loc|
|00002dd0| 6b 54 6f 70 05 46 61 6c | 73 65 09 4c 6f 63 6b 52 |kTop.Fal|se.LockR|
|00002de0| 69 67 68 74 05 46 61 6c | 73 65 0a 4c 6f 63 6b 42 |ight.Fal|se.LockB|
|00002df0| 6f 74 74 6f 6d 04 54 72 | 75 65 08 54 65 78 74 46 |ottom.Tr|ue.TextF|
|00002e00| 6f 6e 74 06 47 65 6e 65 | 76 61 08 54 65 78 74 53 |ont.Gene|va.TextS|
|00002e10| 69 7a 65 01 39 04 42 6f | 6c 64 05 46 61 6c 73 65 |ize.9.Bo|ld.False|
|00002e20| 06 49 74 61 6c 69 63 05 | 46 61 6c 73 65 09 55 6e |.Italic.|False.Un|
|00002e30| 64 65 72 6c 69 6e 65 05 | 46 61 6c 73 65 04 54 65 |derline.|False.Te|
|00002e40| 78 74 1e 50 72 65 73 73 | 20 63 6f 6d 6d 61 6e 64 |xt.Press| command|
|00002e50| 2d 70 65 72 69 6f 64 20 | 74 6f 20 63 61 6e 63 65 |-period |to cance|
|00002e60| 6c 09 54 65 78 74 41 6c | 69 67 6e 01 30 09 54 65 |l.TextAl|ign.0.Te|
|00002e70| 78 74 43 6f 6c 6f 72 01 | 30 09 4d 75 6c 74 69 4c |xtColor.|0.MultiL|
|00002e80| 69 6e 65 05 46 61 6c 73 | 65 07 06 43 61 6e 76 61 |ine.Fals|e..Canva|
|00002e90| 73 10 04 4e 61 6d 65 09 | 53 65 70 61 72 61 74 6f |s..Name.|Separato|
|00002ea0| 72 05 49 6e 64 65 78 0b | 2d 32 31 34 37 34 38 33 |r.Index.|-2147483|
|00002eb0| 36 34 38 0d 54 61 62 50 | 61 6e 65 6c 49 6e 64 65 |648.TabP|anelInde|
|00002ec0| 78 01 30 07 56 69 73 69 | 62 6c 65 04 54 72 75 65 |x.0.Visi|ble.True|
|00002ed0| 04 4c 65 66 74 02 34 36 | 03 54 6f 70 02 38 37 05 |.Left.46|.Top.87.|
|00002ee0| 57 69 64 74 68 03 32 39 | 34 06 48 65 69 67 68 74 |Width.29|4.Height|
|00002ef0| 01 35 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |.5.Ballo|onHelp..|
|00002f00| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00002f10| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|00002f20| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|00002f30| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|00002f40| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|00002f50| 73 65 08 42 61 63 6b 64 | 72 6f 70 01 30 07 45 6e |se.Backd|rop.0.En|
|00002f60| 61 62 6c 65 64 04 54 72 | 75 65 08 0a 50 75 73 68 |abled.Tr|ue..Push|
|00002f70| 42 75 74 74 6f 6e 17 04 | 4e 61 6d 65 09 42 72 6f |Button..|Name.Bro|
|00002f80| 77 73 65 42 54 4e 05 49 | 6e 64 65 78 0b 2d 32 31 |wseBTN.I|ndex.-21|
|00002f90| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|00002fa0| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|00002fb0| 04 54 72 75 65 04 4c 65 | 66 74 03 32 30 38 03 54 |.True.Le|ft.208.T|
|00002fc0| 6f 70 03 31 33 37 05 57 | 69 64 74 68 02 37 32 06 |op.137.W|idth.72.|
|00002fd0| 48 65 69 67 68 74 02 32 | 30 0b 42 61 6c 6c 6f 6f |Height.2|0.Balloo|
|00002fe0| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|00002ff0| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|00003000| 4c 65 66 74 05 46 61 6c | 73 65 07 4c 6f 63 6b 54 |Left.Fal|se.LockT|
|00003010| 6f 70 05 46 61 6c 73 65 | 09 4c 6f 63 6b 52 69 67 |op.False|.LockRig|
|00003020| 68 74 04 54 72 75 65 0a | 4c 6f 63 6b 42 6f 74 74 |ht.True.|LockBott|
|00003030| 6f 6d 04 54 72 75 65 08 | 54 65 78 74 46 6f 6e 74 |om.True.|TextFont|
|00003040| 06 53 79 73 74 65 6d 08 | 54 65 78 74 53 69 7a 65 |.System.|TextSize|
|00003050| 02 31 32 04 42 6f 6c 64 | 05 46 61 6c 73 65 06 49 |.12.Bold|.False.I|
|00003060| 74 61 6c 69 63 05 46 61 | 6c 73 65 09 55 6e 64 65 |talic.Fa|lse.Unde|
|00003070| 72 6c 69 6e 65 05 46 61 | 6c 73 65 07 43 61 70 74 |rline.Fa|lse.Capt|
|00003080| 69 6f 6e 06 42 72 6f 77 | 73 65 07 44 65 66 61 75 |ion.Brow|se.Defau|
|00003090| 6c 74 05 46 61 6c 73 65 | 06 43 61 6e 63 65 6c 05 |lt.False|.Cancel.|
|000030a0| 46 61 6c 73 65 07 45 6e | 61 62 6c 65 64 04 54 72 |False.En|abled.Tr|
|000030b0| 75 65 09 08 43 68 65 63 | 6b 42 6f 78 16 04 4e 61 |ue..Chec|kBox..Na|
|000030c0| 6d 65 0d 4c 69 6d 69 74 | 53 65 61 72 63 68 43 42 |me.Limit|SearchCB|
|000030d0| 05 49 6e 64 65 78 0b 2d | 32 31 34 37 34 38 33 36 |.Index.-|21474836|
|000030e0| 34 38 0d 54 61 62 50 61 | 6e 65 6c 49 6e 64 65 78 |48.TabPa|nelIndex|
|000030f0| 01 30 07 56 69 73 69 62 | 6c 65 04 54 72 75 65 04 |.0.Visib|le.True.|
|00003100| 4c 65 66 74 03 31 35 31 | 03 54 6f 70 02 39 34 05 |Left.151|.Top.94.|
|00003110| 57 69 64 74 68 02 39 35 | 06 48 65 69 67 68 74 02 |Width.95|.Height.|
|00003120| 32 30 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |20.Ballo|onHelp..|
|00003130| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00003140| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|00003150| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|00003160| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|00003170| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|00003180| 73 65 08 54 65 78 74 46 | 6f 6e 74 06 47 65 6e 65 |se.TextF|ont.Gene|
|00003190| 76 61 08 54 65 78 74 53 | 69 7a 65 01 39 04 42 6f |va.TextS|ize.9.Bo|
|000031a0| 6c 64 05 46 61 6c 73 65 | 06 49 74 61 6c 69 63 05 |ld.False|.Italic.|
|000031b0| 46 61 6c 73 65 09 55 6e | 64 65 72 6c 69 6e 65 05 |False.Un|derline.|
|000031c0| 46 61 6c 73 65 07 43 61 | 70 74 69 6f 6e 0e 4c 6f |False.Ca|ption.Lo|
|000031d0| 6f 6b 20 66 69 72 73 74 | 20 69 6e 3a 05 56 61 6c |ok first| in:.Val|
|000031e0| 75 65 05 46 61 6c 73 65 | 07 45 6e 61 62 6c 65 64 |ue.False|.Enabled|
|000031f0| 04 54 72 75 65 0b 09 50 | 6f 70 75 70 4d 65 6e 75 |.True..P|opupMenu|
|00003200| 15 04 4e 61 6d 65 08 55 | 48 4c 69 73 74 50 4d 05 |..Name.U|HListPM.|
|00003210| 49 6e 64 65 78 0b 2d 32 | 31 34 37 34 38 33 36 34 |Index.-2|14748364|
|00003220| 38 0d 54 61 62 50 61 6e | 65 6c 49 6e 64 65 78 01 |8.TabPan|elIndex.|
|00003230| 30 07 56 69 73 69 62 6c | 65 04 54 72 75 65 04 4c |0.Visibl|e.True.L|
|00003240| 65 66 74 03 32 33 34 03 | 54 6f 70 02 39 35 05 57 |eft.234.|Top.95.W|
|00003250| 69 64 74 68 03 31 30 36 | 06 48 65 69 67 68 74 02 |idth.106|.Height.|
|00003260| 31 38 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |18.Ballo|onHelp..|
|00003270| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00003280| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|00003290| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|000032a0| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|000032b0| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|000032c0| 73 65 08 54 65 78 74 46 | 6f 6e 74 06 47 65 6e 65 |se.TextF|ont.Gene|
|000032d0| 76 61 08 54 65 78 74 53 | 69 7a 65 01 39 04 42 6f |va.TextS|ize.9.Bo|
|000032e0| 6c 64 05 46 61 6c 73 65 | 06 49 74 61 6c 69 63 05 |ld.False|.Italic.|
|000032f0| 46 61 6c 73 65 09 55 6e | 64 65 72 6c 69 6e 65 05 |False.Un|derline.|
|00003300| 46 61 6c 73 65 07 45 6e | 61 62 6c 65 64 05 46 61 |False.En|abled.Fa|
|00003310| 6c 73 65 0c 49 6e 69 74 | 69 61 6c 56 61 6c 75 65 |lse.Init|ialValue|
|00003320| 00 0c 00 02 41 04 4d 65 | 6e 75 04 4d 65 6e 75 05 |....A.Me|nu.Menu.|
|00003330| 81 02 b1 01 bd 08 b5 06 | 05 01 00 00 80 80 80 80 |........|........|
|00003340| 10 00 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |........|....Menu|
|00003350| 49 74 65 6d 00 00 00 00 | 00 00 00 02 00 11 41 62 |Item....|......Ab|
|00003360| 6f 75 74 20 54 42 46 69 | 6e 64 65 72 2e 2e 2e 0a |out TBFi|nder....|
|00003370| 41 70 70 6c 65 41 62 6f | 75 74 80 80 80 80 10 00 |AppleAbo|ut......|
|00003380| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|00003390| 65 6d 00 00 00 00 00 00 | 00 00 02 00 00 80 80 80 |em......|........|
|000033a0| 80 10 00 00 00 00 00 07 | 00 00 88 01 08 4d 65 6e |........|.....Men|
|000033b0| 75 49 74 65 6d 00 00 00 | 00 00 00 00 00 00 04 46 |uItem...|.......F|
|000033c0| 69 6c 65 00 80 80 80 80 | 10 00 00 00 00 00 07 00 |ile.....|........|
|000033d0| 00 88 01 08 4d 65 6e 75 | 49 74 65 6d 00 00 00 00 |....Menu|Item....|
|000033e0| 00 00 00 04 00 05 43 6c | 6f 73 65 09 46 69 6c 65 |......Cl|ose.File|
|000033f0| 43 6c 6f 73 65 80 80 80 | 80 10 01 57 00 00 00 00 |Close...|...W....|
|00003400| 07 00 00 88 01 08 4d 65 | 6e 75 49 74 65 6d 00 00 |......Me|nuItem..|
|00003410| 00 00 00 00 00 00 00 01 | 2d 00 80 80 80 80 10 00 |........|-.......|
|00003420| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|00003430| 65 6d 00 00 00 00 00 00 | 00 00 00 04 51 75 69 74 |em......|....Quit|
|00003440| 08 46 69 6c 65 51 75 69 | 74 80 80 80 80 10 01 51 |.FileQui|t......Q|
|00003450| 00 00 00 00 07 00 00 88 | 01 0c 51 75 69 74 4d 65 |........|..QuitMe|
|00003460| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 00 02 00 |nuItem..|........|
|00003470| 00 80 80 80 80 10 00 00 | 00 00 00 07 00 00 88 01 |........|........|
|00003480| 08 4d 65 6e 75 49 74 65 | 6d 00 00 00 00 00 00 00 |.MenuIte|m.......|
|00003490| 00 00 04 45 64 69 74 00 | 80 80 80 80 10 00 00 00 |...Edit.|........|
|000034a0| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|000034b0| 00 00 00 00 00 00 00 0c | 00 04 55 6e 64 6f 08 45 |........|..Undo.E|
|000034c0| 64 69 74 55 6e 64 6f 80 | 80 80 80 10 01 5a 00 00 |ditUndo.|.....Z..|
|000034d0| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|000034e0| 00 00 00 00 00 00 00 00 | 00 01 2d 00 80 80 80 80 |........|..-.....|
|000034f0| 10 00 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |........|....Menu|
|00003500| 49 74 65 6d 00 00 00 00 | 00 00 00 00 00 03 43 75 |Item....|......Cu|
|00003510| 74 07 45 64 69 74 43 75 | 74 80 80 80 80 10 01 58 |t.EditCu|t......X|
|00003520| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|00003530| 65 6d 00 00 00 00 00 00 | 00 00 00 04 43 6f 70 79 |em......|....Copy|
|00003540| 08 45 64 69 74 43 6f 70 | 79 80 80 80 80 10 01 43 |.EditCop|y......C|
|00003550| 00 00 00 00 07 00 00 88 | 01 08 4d 65 6e 75 49 74 |........|..MenuIt|
|00003560| 65 6d 00 00 00 00 00 00 | 00 00 00 05 50 61 73 74 |em......|....Past|
|00003570| 65 09 45 64 69 74 50 61 | 73 74 65 80 80 80 80 10 |e.EditPa|ste.....|
|00003580| 01 56 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |.V......|....Menu|
|00003590| 49 74 65 6d 00 00 00 00 | 00 00 00 00 00 05 43 6c |Item....|......Cl|
|000035a0| 65 61 72 09 45 64 69 74 | 43 6c 65 61 72 80 80 80 |ear.Edit|Clear...|
|000035b0| 80 10 00 00 00 00 00 07 | 00 00 88 01 08 4d 65 6e |........|.....Men|
|000035c0| 75 49 74 65 6d 00 00 00 | 00 00 00 00 00 00 0a 53 |uItem...|.......S|
|000035d0| 65 6c 65 63 74 20 41 6c | 6c 0d 45 64 69 74 53 65 |elect Al|l.EditSe|
|000035e0| 6c 65 63 74 41 6c 6c 80 | 80 80 80 10 01 41 00 00 |lectAll.|.....A..|
|000035f0| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|00003600| 00 00 00 00 00 00 00 00 | 00 01 2d 00 80 80 80 80 |........|..-.....|
|00003610| 10 00 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |........|....Menu|
|00003620| 49 74 65 6d 00 00 00 00 | 00 00 00 00 00 0e 53 68 |Item....|......Sh|
|00003630| 6f 77 20 43 6c 69 70 62 | 6f 61 72 64 11 45 64 69 |ow Clipb|oard.Edi|
|00003640| 74 53 68 6f 77 43 6c 69 | 70 62 6f 61 72 64 80 80 |tShowCli|pboard..|
|00003650| 80 80 10 00 00 00 00 00 | 07 00 00 88 01 08 4d 65 |........|......Me|
|00003660| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 01 02 00 |nuItem..|........|
|00003670| 00 80 80 80 80 10 00 00 | 00 00 00 07 00 00 88 01 |........|........|
|00003680| 08 4d 65 6e 75 49 74 65 | 6d 00 00 00 00 00 00 00 |.MenuIte|m.......|
|00003690| 00 00 01 2d 00 80 80 80 | 80 10 00 00 00 00 00 07 |...-....|........|
|000036a0| 00 00 88 01 08 4d 65 6e | 75 49 74 65 6d 00 00 00 |.....Men|uItem...|
|000036b0| 00 00 00 00 00 00 0e 50 | 72 65 66 65 72 65 6e 63 |.......P|referenc|
|000036c0| 65 73 2e 2e 2e 0f 45 64 | 69 74 50 72 65 66 65 72 |es....Ed|itPrefer|
|000036d0| 65 6e 63 65 73 80 80 80 | 80 10 00 00 00 00 00 07 |ences...|........|
|000036e0| 00 00 88 01 08 4d 65 6e | 75 49 74 65 6d 00 00 00 |.....Men|uItem...|
|000036f0| 00 00 00 00 00 02 00 00 | 80 80 80 80 10 00 00 00 |........|........|
|00003700| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|00003710| 00 00 00 00 00 00 00 00 | 00 08 54 42 46 69 6e 64 |........|..TBFind|
|00003720| 65 72 00 80 80 80 80 10 | 00 00 00 00 00 07 00 00 |er......|........|
|00003730| 88 01 08 4d 65 6e 75 49 | 74 65 6d 00 00 00 00 00 |...MenuI|tem.....|
|00003740| 00 00 08 00 11 46 69 6e | 64 20 54 6f 6f 6c 62 6f |.....Fin|d Toolbo|
|00003750| 78 20 43 61 6c 6c 15 53 | 65 61 72 63 68 46 69 6e |x Call.S|earchFin|
|00003760| 64 54 6f 6f 6c 62 6f 78 | 43 61 6c 6c 80 80 80 80 |dToolbox|Call....|
|00003770| 10 01 46 00 00 00 00 07 | 00 00 88 01 08 4d 65 6e |..F.....|.....Men|
|00003780| 75 49 74 65 6d 00 00 00 | 00 00 00 00 00 00 0e 42 |uItem...|.......B|
|00003790| 72 6f 77 73 65 20 48 65 | 61 64 65 72 73 0f 54 42 |rowse He|aders.TB|
|000037a0| 46 53 6d 61 72 74 42 72 | 6f 77 73 65 72 80 80 80 |FSmartBr|owser...|
|000037b0| 80 10 01 42 00 00 00 00 | 07 00 00 88 01 08 4d 65 |...B....|......Me|
|000037c0| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 00 00 01 |nuItem..|........|
|000037d0| 2d 00 80 80 80 80 10 00 | 00 00 00 00 07 00 00 88 |-.......|........|
|000037e0| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|000037f0| 00 00 00 10 49 6e 63 6c | 75 64 65 20 36 38 6b 20 |....Incl|ude 68k |
|00003800| 63 6f 64 65 14 53 65 61 | 72 63 68 49 6e 63 6c 75 |code.Sea|rchInclu|
|00003810| 64 65 36 38 4b 63 6f 64 | 65 80 80 80 80 10 01 49 |de68Kcod|e......I|
|00003820| 25 52 65 71 75 69 72 65 | 73 20 52 42 20 32 2e 31 |%Require|s RB 2.1|
|00003830| 20 6f 72 20 68 69 67 68 | 65 72 20 74 6f 20 63 6f | or high|er to co|
|00003840| 6d 70 69 6c 65 21 00 00 | 00 07 00 00 88 01 08 4d |mpile!..|.......M|
|00003850| 65 6e 75 49 74 65 6d 00 | 00 00 00 00 00 00 00 00 |enuItem.|........|
|00003860| 01 2d 00 80 80 80 80 10 | 00 00 00 00 00 07 00 00 |.-......|........|
|00003870| 88 01 08 4d 65 6e 75 49 | 74 65 6d 00 00 00 00 00 |...MenuI|tem.....|
|00003880| 00 00 00 00 20 53 65 6c | 65 63 74 20 55 6e 69 76 |.... Sel|ect Univ|
|00003890| 65 72 73 61 6c 20 48 65 | 61 64 65 72 73 20 66 6f |ersal He|aders fo|
|000038a0| 6c 64 65 72 c9 16 54 42 | 46 69 6e 64 65 72 53 65 |lder..TB|FinderSe|
|000038b0| 6c 65 63 74 55 48 46 6f | 6c 64 65 72 80 80 80 80 |lectUHFo|lder....|
|000038c0| 10 00 00 00 00 00 07 00 | 00 88 01 08 4d 65 6e 75 |........|....Menu|
|000038d0| 49 74 65 6d 00 00 00 00 | 00 00 00 00 00 0e 4e 65 |Item....|......Ne|
|000038e0| 77 20 53 6d 61 72 74 49 | 6e 64 65 78 15 54 42 46 |w SmartI|ndex.TBF|
|000038f0| 69 6e 64 65 72 4e 65 77 | 53 6d 61 72 74 49 6e 64 |inderNew|SmartInd|
|00003900| 65 78 80 80 80 80 10 00 | 00 00 00 00 07 00 00 88 |ex......|........|
|00003910| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|00003920| 00 00 02 00 00 80 80 80 | 80 10 00 00 00 00 00 07 |........|........|
|00003930| 00 00 88 01 08 4d 65 6e | 75 49 74 65 6d 00 00 00 |.....Men|uItem...|
|00003940| 00 00 00 00 00 02 00 00 | 80 80 80 80 10 00 00 00 |........|........|
|00003950| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|00003960| 00 00 00 00 00 00 00 00 | 03 41 05 43 6c 61 73 73 |........|.A.Class|
|00003970| 0c 43 41 70 70 6c 69 63 | 61 74 69 6f 6e 06 2c be |.CApplic|ation.,.|
|00003980| 0f bd 0b 07 00 0c 43 41 | 70 70 6c 69 63 61 74 69 |......CA|pplicati|
|00003990| 6f 6e 2b 0b 41 70 70 6c | 69 63 61 74 69 6f 6e 00 |on+.Appl|ication.|
|000039a0| 06 14 70 72 65 66 73 20 | 61 73 20 54 54 73 50 72 |..prefs |as TTsPr|
|000039b0| 65 66 73 4d 67 72 00 1e | 66 69 6e 64 54 42 43 61 |efsMgr..|findTBCa|
|000039c0| 6c 6c 57 4e 44 49 73 4f | 70 65 6e 20 61 73 20 62 |llWNDIsO|pen as b|
|000039d0| 6f 6f 6c 65 61 6e 00 18 | 45 6e 61 62 6c 65 36 38 |oolean..|Enable68|
|000039e0| 6b 4d 65 6e 75 20 61 73 | 20 69 6e 74 65 67 65 72 |kMenu as| integer|
|000039f0| 00 1b 53 6d 61 72 74 42 | 72 6f 77 73 65 72 4f 70 |..SmartB|rowserOp|
|00003a00| 65 6e 20 61 73 20 62 6f | 6f 6c 65 61 6e 00 19 69 |en as bo|olean..i|
|00003a10| 6e 63 6c 75 64 65 36 38 | 6b 43 6f 64 65 20 61 73 |nclude68|kCode as|
|00003a20| 20 62 6f 6f 6c 65 61 6e | 00 1d 67 65 6e 65 72 61 | boolean|..genera|
|00003a30| 6c 50 75 72 70 6f 73 65 | 46 6c 61 67 20 61 73 20 |lPurpose|Flag as |
|00003a40| 62 6f 6f 6c 65 61 6e 00 | 03 0a 46 72 65 65 4d 65 |boolean.|..FreeMe|
|00003a50| 6d 6f 72 79 00 06 64 6f | 75 62 6c 65 00 02 00 02 |mory..do|uble....|
|00003a60| 00 04 1f 46 75 6e 63 74 | 69 6f 6e 20 46 72 65 65 |...Funct|ion Free|
|00003a70| 4d 65 6d 6f 72 79 28 29 | 20 41 73 20 64 6f 75 62 |Memory()| As doub|
|00003a80| 6c 65 8b 01 64 65 63 6c | 61 72 65 20 66 75 6e 63 |le..decl|are func|
|00003a90| 74 69 6f 6e 20 46 72 65 | 65 4d 65 6d 20 6c 69 62 |tion Fre|eMem lib|
|00003aa0| 20 22 49 6e 74 65 72 66 | 61 63 65 4c 69 62 22 20 | "Interf|aceLib" |
|00003ab0| 28 29 20 61 73 20 69 6e | 74 65 67 65 72 20 69 6e |() as in|teger in|
|00003ac0| 6c 69 6e 65 36 38 6b 28 | 22 41 30 31 43 22 29 10 |line68k(|"A01C").|
|00003ad0| 72 65 74 75 72 6e 20 46 | 72 65 65 4d 65 6d 28 29 |return F|reeMem()|
|00003ae0| 0c 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 11 53 65 |.End Fun|ction.Se|
|00003af0| 74 36 38 6b 43 6f 64 65 | 44 69 73 70 6c 61 79 13 |t68kCode|Display.|
|00003b00| 6e 65 77 56 61 6c 75 65 | 20 61 73 20 62 6f 6f 6c |newValue| as bool|
|00003b10| 65 61 6e 00 00 01 19 01 | 19 10 2a 53 75 62 20 53 |ean.....|..*Sub S|
|00003b20| 65 74 36 38 6b 43 6f 64 | 65 44 69 73 70 6c 61 79 |et68kCod|eDisplay|
|00003b30| 28 6e 65 77 56 61 6c 75 | 65 20 61 73 20 62 6f 6f |(newValu|e as boo|
|00003b40| 6c 65 61 6e 29 19 67 65 | 6e 65 72 61 6c 50 75 72 |lean).ge|neralPur|
|00003b50| 70 6f 73 65 46 6c 61 67 | 20 3d 20 54 52 55 45 00 |poseFlag| = TRUE.|
|00003b60| 19 69 6e 63 6c 75 64 65 | 36 38 6b 43 6f 64 65 20 |.include|68kCode |
|00003b70| 3d 20 6e 65 77 56 61 6c | 75 65 00 1b 69 66 20 66 |= newVal|ue..if f|
|00003b80| 69 6e 64 54 42 43 61 6c | 6c 57 4e 44 49 73 4f 70 |indTBCal|lWNDIsOp|
|00003b90| 65 6e 20 74 68 65 6e 31 | 46 69 6e 64 54 42 43 61 |en then1|FindTBCa|
|00003ba0| 6c 6c 57 4e 44 2e 57 69 | 74 68 36 38 4b 43 68 65 |llWND.Wi|th68KChe|
|00003bb0| 63 6b 2e 76 61 6c 75 65 | 20 3d 20 69 6e 63 6c 75 |ck.value| = inclu|
|00003bc0| 64 65 36 38 6b 43 6f 64 | 65 06 65 6e 64 20 69 66 |de68kCod|e.end if|
|00003bd0| 00 18 69 66 20 53 6d 61 | 72 74 42 72 6f 77 73 65 |..if Sma|rtBrowse|
|00003be0| 72 4f 70 65 6e 20 74 68 | 65 6e 30 53 6d 61 72 74 |rOpen th|en0Smart|
|00003bf0| 4c 69 73 74 57 4e 44 2e | 57 69 74 68 36 38 4b 43 |ListWND.|With68KC|
|00003c00| 68 65 63 6b 2e 76 61 6c | 75 65 20 3d 20 69 6e 63 |heck.val|ue = inc|
|00003c10| 6c 75 64 65 36 38 6b 43 | 6f 64 65 06 65 6e 64 20 |lude68kC|ode.end |
|00003c20| 69 66 00 1a 67 65 6e 65 | 72 61 6c 50 75 72 70 6f |if..gene|ralPurpo|
|00003c30| 73 65 46 6c 61 67 20 3d | 20 46 41 4c 53 45 00 07 |seFlag =| FALSE..|
|00003c40| 45 6e 64 20 53 75 62 04 | 51 75 69 74 00 00 00 01 |End Sub.|Quit....|
|00003c50| 04 01 04 03 0a 53 75 62 | 20 51 75 69 74 28 29 04 |.....Sub| Quit().|
|00003c60| 51 75 69 74 07 45 6e 64 | 20 53 75 62 00 06 0a 44 |Quit.End| Sub...D|
|00003c70| 65 61 63 74 69 76 61 74 | 65 01 00 01 00 05 10 53 |eactivat|e......S|
|00003c80| 75 62 20 44 65 61 63 74 | 69 76 61 74 65 28 29 1c |ub Deact|ivate().|
|00003c90| 69 66 20 43 6c 69 70 62 | 6f 61 72 64 57 4e 44 2e |if Clipb|oardWND.|
|00003ca0| 76 69 73 69 62 6c 65 20 | 74 68 65 6e 1c 43 6c 69 |visible |then.Cli|
|00003cb0| 70 62 6f 61 72 64 57 4e | 44 2e 76 69 73 69 62 6c |pboardWN|D.visibl|
|00003cc0| 65 20 3d 20 66 61 6c 73 | 65 03 65 6e 64 07 45 6e |e = fals|e.end.En|
|00003cd0| 64 20 53 75 62 10 48 61 | 6e 64 6c 65 41 70 70 6c |d Sub.Ha|ndleAppl|
|00003ce0| 65 45 76 65 6e 74 01 00 | 01 00 03 a2 01 46 75 6e |eEvent..|.....Fun|
|00003cf0| 63 74 69 6f 6e 20 48 61 | 6e 64 6c 65 41 70 70 6c |ction Ha|ndleAppl|
|00003d00| 65 45 76 65 6e 74 28 65 | 76 65 6e 74 20 41 73 20 |eEvent(e|vent As |
|00003d10| 41 70 70 6c 65 45 76 65 | 6e 74 2c 20 65 76 65 6e |AppleEve|nt, even|
|00003d20| 74 43 6c 61 73 73 20 41 | 73 20 53 74 72 69 6e 67 |tClass A|s String|
|00003d30| 2c 20 65 76 65 6e 74 49 | 44 20 41 73 20 53 74 72 |, eventI|D As Str|
|00003d40| 69 6e 67 29 20 41 73 20 | 42 6f 6f 6c 65 61 6e 00 |ing) As |Boolean.|
|00003d50| 0c 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 05 43 6c |.End Fun|ction.Cl|
|00003d60| 6f 73 65 02 00 02 00 04 | 0b 53 75 62 20 43 6c 6f |ose.....|.Sub Clo|
|00003d70| 73 65 28 29 31 70 72 65 | 66 73 2e 53 65 74 42 6f |se()1pre|fs.SetBo|
|00003d80| 6f 6c 65 61 6e 28 20 22 | 49 6e 63 6c 75 64 65 36 |olean( "|Include6|
|00003d90| 38 6b 22 20 2c 20 69 6e | 63 6c 75 64 65 36 38 6b |8k" , in|clude68k|
|00003da0| 43 6f 64 65 20 29 0d 70 | 72 65 66 73 2e 43 6c 6f |Code ).p|refs.Clo|
|00003db0| 73 65 28 29 07 45 6e 64 | 20 53 75 62 04 4f 70 65 |se().End| Sub.Ope|
|00003dc0| 6e 07 11 07 11 09 0a 53 | 75 62 20 4f 70 65 6e 28 |n......S|ub Open(|
|00003dd0| 29 2a 70 72 65 66 73 20 | 3d 20 6e 65 77 20 54 54 |)*prefs |= new TT|
|00003de0| 73 50 72 65 66 73 4d 67 | 72 28 22 54 42 46 69 6e |sPrefsMg|r("TBFin|
|00003df0| 64 65 72 22 2c 22 54 42 | 46 6e 22 29 3c 69 6e 63 |der","TB|Fn")<inc|
|00003e00| 6c 75 64 65 36 38 6b 43 | 6f 64 65 20 3d 20 61 70 |lude68kC|ode = ap|
|00003e10| 70 2e 70 72 65 66 73 2e | 47 65 74 42 6f 6f 6c 65 |p.prefs.|GetBoole|
|00003e20| 61 6e 28 20 22 49 6e 63 | 6c 75 64 65 36 38 6b 22 |an( "Inc|lude68k"|
|00003e30| 20 2c 20 54 52 55 45 20 | 29 3c 47 65 6e 65 72 61 | , TRUE |)<Genera|
|00003e40| 74 65 54 43 43 6f 64 65 | 20 3d 20 61 70 70 2e 70 |teTCCode| = app.p|
|00003e50| 72 65 66 73 2e 47 65 74 | 42 6f 6f 6c 65 61 6e 28 |refs.Get|Boolean(|
|00003e60| 22 54 69 74 6c 65 43 61 | 73 65 5f 43 6f 64 65 22 |"TitleCa|se_Code"|
|00003e70| 2c 74 72 75 65 29 3f 55 | 73 65 53 6d 61 72 74 42 |,true)?U|seSmartB|
|00003e80| 72 6f 77 73 65 72 20 3d | 20 61 70 70 2e 70 72 65 |rowser =| app.pre|
|00003e90| 66 73 2e 47 65 74 42 6f | 6f 6c 65 61 6e 28 22 55 |fs.GetBo|olean("U|
|00003ea0| 73 65 5f 53 6d 61 72 74 | 42 72 6f 77 73 65 72 22 |se_Smart|Browser"|
|00003eb0| 2c 74 72 75 65 29 83 01 | 48 61 6e 64 6c 65 73 41 |,true)..|HandlesA|
|00003ec0| 72 65 4d 42 73 20 3d 20 | 61 70 70 2e 70 72 65 66 |reMBs = |app.pref|
|00003ed0| 73 2e 47 65 74 42 6f 6f | 6c 65 61 6e 28 22 48 61 |s.GetBoo|lean("Ha|
|00003ee0| 6e 64 6c 65 73 5f 61 72 | 65 5f 6d 65 6d 62 6c 6f |ndles_ar|e_memblo|
|00003ef0| 63 6b 73 22 2c 66 61 6c | 73 65 29 00 11 61 70 70 |cks",fal|se)..app|
|00003f00| 2e 70 72 65 66 73 2e 63 | 6c 6f 73 65 28 29 07 45 |.prefs.c|lose().E|
|00003f10| 6e 64 20 53 75 62 08 41 | 63 74 69 76 61 74 65 01 |nd Sub.A|ctivate.|
|00003f20| 17 01 17 05 0e 53 75 62 | 20 41 63 74 69 76 61 74 |.....Sub| Activat|
|00003f30| 65 28 29 1c 69 66 20 43 | 6c 69 70 62 6f 61 72 64 |e().if C|lipboard|
|00003f40| 57 4e 44 2e 76 69 73 69 | 62 6c 65 20 74 68 65 6e |WND.visi|ble then|
|00003f50| 15 43 6c 69 70 62 6f 61 | 72 64 57 4e 44 2e 75 70 |.Clipboa|rdWND.up|
|00003f60| 64 61 74 65 28 29 03 65 | 6e 64 07 45 6e 64 20 53 |date().e|nd.End S|
|00003f70| 75 62 0f 45 6e 61 62 6c | 65 4d 65 6e 75 49 74 65 |ub.Enabl|eMenuIte|
|00003f80| 6d 73 0e 25 0e 25 10 15 | 53 75 62 20 45 6e 61 62 |ms.%.%..|Sub Enab|
|00003f90| 6c 65 4d 65 6e 75 49 74 | 65 6d 73 28 29 19 41 70 |leMenuIt|ems().Ap|
|00003fa0| 70 6c 65 41 62 6f 75 74 | 2e 65 6e 61 62 6c 65 64 |pleAbout|.enabled|
|00003fb0| 20 3d 20 74 72 75 65 00 | 20 45 64 69 74 53 68 6f | = true.| EditSho|
|00003fc0| 77 43 6c 69 70 62 6f 61 | 72 64 2e 65 6e 61 62 6c |wClipboa|rd.enabl|
|00003fd0| 65 64 20 3d 20 74 72 75 | 65 1e 45 64 69 74 50 72 |ed = tru|e.EditPr|
|00003fe0| 65 66 65 72 65 6e 63 65 | 73 2e 65 6e 61 62 6c 65 |eference|s.enable|
|00003ff0| 64 20 3d 20 74 72 75 65 | 00 24 53 65 61 72 63 68 |d = true|.$Search|
|00004000| 46 69 6e 64 54 6f 6f 6c | 62 6f 78 43 61 6c 6c 2e |FindTool|boxCall.|
|00004010| 65 6e 61 62 6c 65 64 20 | 3d 20 54 72 75 65 00 30 |enabled |= True.0|
|00004020| 53 65 61 72 63 68 49 6e | 63 6c 75 64 65 36 38 4b |SearchIn|clude68K|
|00004030| 63 6f 64 65 2e 65 6e 61 | 62 6c 65 64 20 3d 20 45 |code.ena|bled = E|
|00004040| 6e 61 62 6c 65 36 38 6b | 4d 65 6e 75 20 3e 20 30 |nable68k|Menu > 0|
|00004050| 2d 53 65 61 72 63 68 49 | 6e 63 6c 75 64 65 36 38 |-SearchI|nclude68|
|00004060| 4b 63 6f 64 65 2e 63 68 | 65 63 6b 65 64 20 3d 20 |Kcode.ch|ecked = |
|00004070| 69 6e 63 6c 75 64 65 36 | 38 6b 43 6f 64 65 00 00 |include6|8kCode..|
|00004080| 1e 54 42 46 53 6d 61 72 | 74 42 72 6f 77 73 65 72 |.TBFSmar|tBrowser|
|00004090| 2e 65 6e 61 62 6c 65 64 | 20 3d 20 54 72 75 65 30 |.enabled| = True0|
|000040a0| 54 42 46 69 6e 64 65 72 | 4e 65 77 53 6d 61 72 74 |TBFinder|NewSmart|
|000040b0| 49 6e 64 65 78 2e 65 6e | 61 62 6c 65 64 20 3d 20 |Index.en|abled = |
|000040c0| 53 6d 61 72 74 42 72 6f | 77 73 65 72 4f 70 65 6e |SmartBro|wserOpen|
|000040d0| 25 54 42 66 69 6e 64 65 | 72 53 65 6c 65 63 74 55 |%TBfinde|rSelectU|
|000040e0| 48 46 6f 6c 64 65 72 2e | 65 6e 61 62 6c 65 64 20 |HFolder.|enabled |
|000040f0| 3d 20 74 72 75 65 07 45 | 6e 64 20 53 75 62 07 0a |= true.E|nd Sub..|
|00004100| 41 70 70 6c 65 41 62 6f | 75 74 01 0f 01 0f 03 1a |AppleAbo|ut......|
|00004110| 46 75 6e 63 74 69 6f 6e | 20 41 63 74 69 6f 6e 20 |Function| Action |
|00004120| 41 73 20 42 6f 6f 6c 65 | 61 6e 0f 41 62 6f 75 74 |As Boole|an.About|
|00004130| 57 4e 44 2e 73 68 6f 77 | 28 29 0c 45 6e 64 20 46 |WND.show|().End F|
|00004140| 75 6e 63 74 69 6f 6e 15 | 53 65 61 72 63 68 46 69 |unction.|SearchFi|
|00004150| 6e 64 54 6f 6f 6c 62 6f | 78 43 61 6c 6c 01 00 01 |ndToolbo|xCall...|
|00004160| 0a 03 1a 46 75 6e 63 74 | 69 6f 6e 20 41 63 74 69 |...Funct|ion Acti|
|00004170| 6f 6e 20 41 73 20 42 6f | 6f 6c 65 61 6e 14 46 69 |on As Bo|olean.Fi|
|00004180| 6e 64 54 42 43 61 6c 6c | 57 4e 44 2e 73 68 6f 77 |ndTBCall|WND.show|
|00004190| 28 29 0c 45 6e 64 20 46 | 75 6e 63 74 69 6f 6e 11 |().End F|unction.|
|000041a0| 45 64 69 74 53 68 6f 77 | 43 6c 69 70 62 6f 61 72 |EditShow|Clipboar|
|000041b0| 64 01 13 01 13 03 1a 46 | 75 6e 63 74 69 6f 6e 20 |d......F|unction |
|000041c0| 41 63 74 69 6f 6e 20 41 | 73 20 42 6f 6f 6c 65 61 |Action A|s Boolea|
|000041d0| 6e 13 43 6c 69 70 62 6f | 61 72 64 57 4e 44 2e 73 |n.Clipbo|ardWND.s|
|000041e0| 68 6f 77 28 29 0c 45 6e | 64 20 46 75 6e 63 74 69 |how().En|d Functi|
|000041f0| 6f 6e 14 53 65 61 72 63 | 68 49 6e 63 6c 75 64 65 |on.Searc|hInclude|
|00004200| 36 38 4b 63 6f 64 65 02 | 00 02 11 05 1a 46 75 6e |68Kcode.|.....Fun|
|00004210| 63 74 69 6f 6e 20 41 63 | 74 69 6f 6e 20 41 73 20 |ction Ac|tion As |
|00004220| 42 6f 6f 6c 65 61 6e 00 | 25 53 65 74 36 38 6b 43 |Boolean.|%Set68kC|
|00004230| 6f 64 65 44 69 73 70 6c | 61 79 28 6e 6f 74 20 69 |odeDispl|ay(not i|
|00004240| 6e 63 6c 75 64 65 36 38 | 6b 43 6f 64 65 29 00 0c |nclude68|kCode)..|
|00004250| 45 6e 64 20 46 75 6e 63 | 74 69 6f 6e 16 54 42 46 |End Func|tion.TBF|
|00004260| 69 6e 64 65 72 53 65 6c | 65 63 74 55 48 46 6f 6c |inderSel|ectUHFol|
|00004270| 64 65 72 06 14 06 14 09 | 1a 46 75 6e 63 74 69 6f |der.....|.Functio|
|00004280| 6e 20 41 63 74 69 6f 6e | 20 41 73 20 42 6f 6f 6c |n Action| As Bool|
|00004290| 65 61 6e 13 64 69 6d 20 | 66 20 61 73 20 66 6f 6c |ean.dim |f as fol|
|000042a0| 64 65 72 49 74 65 6d 00 | 12 66 20 3d 20 73 65 6c |derItem.|.f = sel|
|000042b0| 65 63 74 46 6f 6c 64 65 | 72 28 29 10 69 66 20 66 |ectFolde|r().if f|
|000042c0| 20 3c 3e 20 6e 69 6c 20 | 74 68 65 6e 30 61 70 70 | <> nil |then0app|
|000042d0| 2e 70 72 65 66 73 2e 53 | 65 74 46 6f 6c 64 65 72 |.prefs.S|etFolder|
|000042e0| 49 74 65 6d 28 22 55 6e | 69 76 65 72 73 61 6c 20 |Item("Un|iversal |
|000042f0| 48 65 61 64 65 72 73 20 | c4 22 2c 66 29 14 55 6e |Headers |.",f).Un|
|00004300| 69 76 65 72 73 61 6c 48 | 65 61 64 65 72 73 20 3d |iversalH|eaders =|
|00004310| 20 66 03 65 6e 64 0c 45 | 6e 64 20 46 75 6e 63 74 | f.end.E|nd Funct|
|00004320| 69 6f 6e 0f 54 42 46 53 | 6d 61 72 74 42 72 6f 77 |ion.TBFS|martBrow|
|00004330| 73 65 72 01 0f 01 0f 03 | 1a 46 75 6e 63 74 69 6f |ser.....|.Functio|
|00004340| 6e 20 41 63 74 69 6f 6e | 20 41 73 20 42 6f 6f 6c |n Action| As Bool|
|00004350| 65 61 6e 0f 42 72 6f 77 | 73 65 48 65 61 64 65 72 |ean.Brow|seHeader|
|00004360| 73 28 29 0c 45 6e 64 20 | 46 75 6e 63 74 69 6f 6e |s().End |Function|
|00004370| 0f 45 64 69 74 50 72 65 | 66 65 72 65 6e 63 65 73 |.EditPre|ferences|
|00004380| 01 0f 01 0f 03 1a 46 75 | 6e 63 74 69 6f 6e 20 41 |......Fu|nction A|
|00004390| 63 74 69 6f 6e 20 41 73 | 20 42 6f 6f 6c 65 61 6e |ction As| Boolean|
|000043a0| 0f 50 72 65 66 73 57 4e | 44 2e 73 68 6f 77 28 29 |.PrefsWN|D.show()|
|000043b0| 0c 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 00 00 04 |.End Fun|ction...|
|000043c0| 1f 04 56 69 65 77 10 53 | 65 61 72 63 68 52 65 73 |..View.S|earchRes|
|000043d0| 75 6c 74 73 57 4e 44 05 | b8 02 97 02 0a 91 01 97 |ultsWND.|........|
|000043e0| 0e 9a 08 83 03 13 04 4e | 61 6d 65 10 53 65 61 72 |.......N|ame.Sear|
|000043f0| 63 68 52 65 73 75 6c 74 | 73 57 4e 44 05 46 72 61 |chResult|sWND.Fra|
|00004400| 6d 65 01 30 0c 48 61 73 | 42 61 63 6b 43 6f 6c 6f |me.0.Has|BackColo|
|00004410| 72 05 46 61 6c 73 65 09 | 42 61 63 6b 43 6f 6c 6f |r.False.|BackColo|
|00004420| 72 08 31 36 37 37 37 32 | 31 35 08 42 61 63 6b 64 |r.167772|15.Backd|
|00004430| 72 6f 70 01 30 05 54 69 | 74 6c 65 06 52 65 73 75 |rop.0.Ti|tle.Resu|
|00004440| 6c 74 07 56 69 73 69 62 | 6c 65 04 54 72 75 65 08 |lt.Visib|le.True.|
|00004450| 43 6c 6f 73 65 42 6f 78 | 04 54 72 75 65 08 47 72 |CloseBox|.True.Gr|
|00004460| 6f 77 49 63 6f 6e 04 54 | 72 75 65 08 5a 6f 6f 6d |owIcon.T|rue.Zoom|
|00004470| 49 63 6f 6e 05 46 61 6c | 73 65 0b 42 61 6c 6c 6f |Icon.Fal|se.Ballo|
|00004480| 6f 6e 48 65 6c 70 00 09 | 4d 61 63 50 72 6f 63 49 |onHelp..|MacProcI|
|00004490| 44 01 30 09 50 6c 61 63 | 65 6d 65 6e 74 01 30 05 |D.0.Plac|ement.0.|
|000044a0| 57 69 64 74 68 03 33 37 | 35 06 48 65 69 67 68 74 |Width.37|5.Height|
|000044b0| 03 32 34 32 08 4d 69 6e | 57 69 64 74 68 03 33 35 |.242.Min|Width.35|
|000044c0| 36 09 4d 69 6e 48 65 69 | 67 68 74 03 32 30 32 08 |6.MinHei|ght.202.|
|000044d0| 4d 61 78 57 69 64 74 68 | 03 36 30 30 09 4d 61 78 |MaxWidth|.600.Max|
|000044e0| 48 65 69 67 68 74 03 33 | 30 30 07 00 10 53 65 61 |Height.3|00...Sea|
|000044f0| 72 63 68 52 65 73 75 6c | 74 73 57 4e 44 bc 01 06 |rchResul|tsWND...|
|00004500| 44 69 61 6c 6f 67 00 03 | 16 43 6f 64 65 43 6f 6d |Dialog..|.CodeCom|
|00004510| 6d 65 6e 74 73 20 61 73 | 20 73 74 72 69 6e 67 00 |ments as| string.|
|00004520| 18 68 65 61 64 65 72 46 | 69 6c 65 20 61 73 20 66 |.headerF|ile as f|
|00004530| 6f 6c 64 65 72 69 74 65 | 6d 00 14 6f 6c 64 48 65 |olderite|m..oldHe|
|00004540| 69 67 68 74 20 61 73 20 | 49 6e 74 65 67 65 72 00 |ight as |Integer.|
|00004550| 03 15 43 6f 70 79 52 65 | 73 75 6c 74 54 6f 43 6c |..CopyRe|sultToCl|
|00004560| 69 70 62 6f 61 72 64 00 | 00 00 04 09 04 13 0c 1b |ipboard.|........|
|00004570| 53 75 62 20 43 6f 70 79 | 52 65 73 75 6c 74 54 6f |Sub Copy|ResultTo|
|00004580| 43 6c 69 70 62 6f 61 72 | 64 28 29 12 64 69 6d 20 |Clipboar|d().dim |
|00004590| 63 20 61 73 20 63 6c 69 | 70 62 6f 61 72 64 00 11 |c as cli|pboard..|
|000045a0| 63 20 3d 20 6e 65 77 20 | 63 6c 69 70 62 6f 61 72 |c = new |clipboar|
|000045b0| 64 37 63 2e 74 65 78 74 | 20 3d 20 52 42 44 65 63 |d7c.text| = RBDec|
|000045c0| 6c 61 72 65 53 54 2e 74 | 65 78 74 20 2b 20 63 68 |lareST.t|ext + ch|
|000045d0| 72 28 31 33 29 20 2b 20 | 73 65 6c 66 2e 63 6f 64 |r(13) + |self.cod|
|000045e0| 65 43 6f 6d 6d 65 6e 74 | 73 09 63 2e 63 6c 6f 73 |eComment|s.c.clos|
|000045f0| 65 28 29 00 1c 69 66 20 | 43 6c 69 70 62 6f 61 72 |e()..if |Clipboar|
|00004600| 64 57 4e 44 2e 76 69 73 | 69 62 6c 65 20 74 68 65 |dWND.vis|ible the|
|00004610| 6e 15 43 6c 69 70 62 6f | 61 72 64 57 4e 44 2e 75 |n.Clipbo|ardWND.u|
|00004620| 70 64 61 74 65 28 29 03 | 65 6e 64 00 07 45 6e 64 |pdate().|end..End|
|00004630| 20 53 75 62 0e 45 6e 61 | 62 6c 65 43 6f 6e 74 72 | Sub.Ena|bleContr|
|00004640| 6f 6c 73 0c 62 20 61 73 | 20 62 6f 6f 6c 65 61 6e |ols.b as| boolean|
|00004650| 00 00 05 00 05 00 12 20 | 53 75 62 20 45 6e 61 62 |....... |Sub Enab|
|00004660| 6c 65 43 6f 6e 74 72 6f | 6c 73 28 62 20 61 73 20 |leContro|ls(b as |
|00004670| 62 6f 6f 6c 65 61 6e 29 | 09 2f 2f 20 6a 61 6b 6f |boolean)|.// jako|
|00004680| 62 62 1c 43 56 52 65 76 | 65 61 6c 49 6e 46 69 6e |bb.CVRev|ealInFin|
|00004690| 64 65 72 2e 65 6e 61 62 | 6c 65 64 20 3d 20 62 16 |der.enab|led = b.|
|000046a0| 43 56 44 72 61 67 54 65 | 78 74 2e 65 6e 61 62 6c |CVDragTe|xt.enabl|
|000046b0| 65 64 20 3d 20 62 16 43 | 56 4f 70 65 6e 46 69 6c |ed = b.C|VOpenFil|
|000046c0| 65 2e 65 6e 61 62 6c 65 | 64 20 3d 20 62 22 43 56 |e.enable|d = b"CV|
|000046d0| 47 65 74 49 6e 66 6f 2e | 65 6e 61 62 6c 65 64 20 |GetInfo.|enabled |
|000046e0| 3d 20 62 20 2f 2f 20 67 | 75 69 6c 6c 61 75 6d 65 |= b // g|uillaume|
|000046f0| 14 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|00004700| 2d 2d 2d 2d 2d 11 48 4e | 61 6d 65 53 54 2e 45 6e |-----.HN|ameST.En|
|00004710| 61 62 6c 65 28 62 29 1a | 52 42 44 65 63 6c 61 72 |able(b).|RBDeclar|
|00004720| 65 4c 61 62 65 6c 53 54 | 2e 45 6e 61 62 6c 65 28 |eLabelST|.Enable(|
|00004730| 62 29 15 52 42 44 65 63 | 6c 61 72 65 53 54 2e 45 |b).RBDec|lareST.E|
|00004740| 6e 61 62 6c 65 28 62 29 | 19 43 44 65 63 6c 61 72 |nable(b)|.CDeclar|
|00004750| 65 4c 61 62 65 6c 53 54 | 2e 45 6e 61 62 6c 65 28 |eLabelST|.Enable(|
|00004760| 62 29 14 43 44 65 63 6c | 61 72 65 53 54 2e 45 6e |b).CDecl|areST.En|
|00004770| 61 62 6c 65 28 62 29 14 | 2f 2f 2d 2d 2d 2d 2d 2d |able(b).|//------|
|00004780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 16 53 65 70 |--------|----.Sep|
|00004790| 61 72 61 74 6f 72 31 2e | 65 6e 61 62 6c 65 64 20 |arator1.|enabled |
|000047a0| 3d 20 62 16 53 65 70 61 | 72 61 74 6f 72 32 2e 65 |= b.Sepa|rator2.e|
|000047b0| 6e 61 62 6c 65 64 20 3d | 20 62 00 14 42 61 63 6b |nabled =| b..Back|
|000047c0| 43 61 6e 76 61 73 2e 65 | 6e 61 62 6c 65 28 62 29 |Canvas.e|nable(b)|
|000047d0| 07 45 6e 64 20 53 75 62 | 0e 53 68 6f 77 43 61 72 |.End Sub|.ShowCar|
|000047e0| 62 6f 6e 49 6e 66 6f 0f | 69 6e 66 6f 20 61 73 20 |bonInfo.|info as |
|000047f0| 69 6e 74 65 67 65 72 00 | 00 07 39 07 39 0d 23 53 |integer.|..9.9.#S|
|00004800| 75 62 20 53 68 6f 77 43 | 61 72 62 6f 6e 49 6e 66 |ub ShowC|arbonInf|
|00004810| 6f 28 69 6e 66 6f 20 61 | 73 20 69 6e 74 65 67 65 |o(info a|s intege|
|00004820| 72 29 10 73 65 6c 65 63 | 74 20 63 61 73 65 20 69 |r).selec|t case i|
|00004830| 6e 66 6f 06 63 61 73 65 | 20 31 21 43 61 72 62 6f |nfo.case| 1!Carbo|
|00004840| 6e 53 54 2e 74 65 78 74 | 43 6f 6c 6f 72 20 3d 20 |nST.text|Color = |
|00004850| 52 47 42 28 32 35 35 2c | 30 2c 30 29 3a 43 61 72 |RGB(255,|0,0):Car|
|00004860| 62 6f 6e 53 54 2e 74 65 | 78 74 20 3d 20 22 54 68 |bonST.te|xt = "Th|
|00004870| 69 73 20 63 61 6c 6c 20 | 69 73 20 6e 6f 74 20 73 |is call |is not s|
|00004880| 75 70 70 6f 72 74 65 64 | 20 75 6e 64 65 72 20 43 |upported| under C|
|00004890| 61 72 62 6f 6e 2e 22 06 | 63 61 73 65 20 32 23 43 |arbon.".|case 2#C|
|000048a0| 61 72 62 6f 6e 53 54 2e | 74 65 78 74 43 6f 6c 6f |arbonST.|textColo|
|000048b0| 72 20 3d 20 52 47 42 28 | 31 34 30 2c 30 2c 31 34 |r = RGB(|140,0,14|
|000048c0| 30 29 3a 43 61 72 62 6f | 6e 53 54 2e 74 65 78 74 |0):Carbo|nST.text|
|000048d0| 20 3d 20 22 54 68 69 73 | 20 63 61 6c 6c 20 68 61 | = "This| call ha|
|000048e0| 20 62 65 65 6e 20 6d 6f | 64 69 66 69 65 64 20 75 | been mo|dified u|
|000048f0| 6e 64 65 72 20 43 61 72 | 62 6f 6e 2e 22 06 63 61 |nder Car|bon.".ca|
|00004900| 73 65 20 30 21 43 61 72 | 62 6f 6e 53 54 2e 74 65 |se 0!Car|bonST.te|
|00004910| 78 74 43 6f 6c 6f 72 20 | 3d 20 52 47 42 28 30 2c |xtColor |= RGB(0,|
|00004920| 30 2c 32 35 35 29 3f 43 | 61 72 62 6f 6e 53 54 2e |0,255)?C|arbonST.|
|00004930| 74 65 78 74 20 3d 20 22 | 54 68 69 73 20 63 61 6c |text = "|This cal|
|00004940| 6c 20 73 65 65 6d 73 20 | 74 6f 20 62 65 20 73 75 |l seems |to be su|
|00004950| 70 70 6f 72 74 65 64 20 | 75 6e 64 65 72 20 43 61 |pported |under Ca|
|00004960| 72 62 6f 6e 2e 22 03 65 | 6e 64 07 45 6e 64 20 53 |rbon.".e|nd.End S|
|00004970| 75 62 00 08 07 4d 6f 75 | 73 65 55 70 01 00 01 00 |ub...Mou|seUp....|
|00004980| 03 27 53 75 62 20 4d 6f | 75 73 65 55 70 28 58 20 |.'Sub Mo|useUp(X |
|00004990| 41 73 20 49 6e 74 65 67 | 65 72 2c 20 59 20 41 73 |As Integ|er, Y As|
|000049a0| 20 49 6e 74 65 67 65 72 | 29 00 07 45 6e 64 20 53 | Integer|)..End S|
|000049b0| 75 62 07 52 65 73 69 7a | 65 64 07 00 07 00 15 0d |ub.Resiz|ed......|
|000049c0| 53 75 62 20 52 65 73 69 | 7a 65 64 28 29 0c 2f 2f |Sub Resi|zed().//|
|000049d0| 20 67 75 69 6c 6c 61 75 | 6d 65 00 31 2f 2f 20 54 | guillau|me.1// T|
|000049e0| 68 69 73 20 63 6f 64 65 | 20 77 69 6c 6c 20 72 65 |his code| will re|
|000049f0| 73 69 7a 65 20 62 6f 74 | 68 20 64 65 63 6c 61 72 |size bot|h declar|
|00004a00| 61 74 69 6f 6e 73 20 66 | 69 65 6c 64 2e 32 2f 2f |ations f|ield.2//|
|00004a10| 20 28 42 65 66 6f 72 65 | 2c 20 74 68 65 20 52 42 | (Before|, the RB|
|00004a20| 20 6f 6e 65 20 77 61 73 | 20 61 6c 77 61 79 73 20 | one was| always |
|00004a30| 74 68 65 20 73 61 6d 65 | 20 68 65 69 67 68 74 2c |the same| height,|
|00004a40| 35 2f 2f 20 72 65 73 75 | 6c 74 69 6e 67 20 69 6e |5// resu|lting in|
|00004a50| 20 63 6c 69 70 70 69 6e | 67 20 66 6f 72 20 76 65 | clippin|g for ve|
|00004a60| 72 79 20 6c 6f 6e 67 20 | 65 6e 74 72 69 65 73 20 |ry long |entries |
|00004a70| 2d 2d 20 74 72 79 2b 2f | 2f 20 41 45 49 6e 73 74 |-- try+/|/ AEInst|
|00004a80| 61 6c 6c 43 6f 65 72 63 | 69 6f 6e 48 61 6e 64 6c |allCoerc|ionHandl|
|00004a90| 65 72 2c 20 66 6f 72 20 | 65 78 61 6d 70 6c 65 2e |er, for |example.|
|00004aa0| 5d 29 00 16 64 69 6d 20 | 64 48 65 69 67 68 74 20 |])..dim |dHeight |
|00004ab0| 61 73 20 49 6e 74 65 67 | 65 72 00 22 64 48 65 69 |as Integ|er."dHei|
|00004ac0| 67 68 74 20 3d 20 28 48 | 65 69 67 68 74 20 2d 20 |ght = (H|eight - |
|00004ad0| 6f 6c 64 48 65 69 67 68 | 74 29 20 2f 20 32 00 31 |oldHeigh|t) / 2.1|
|00004ae0| 52 42 44 65 63 6c 61 72 | 65 53 54 2e 48 65 69 67 |RBDeclar|eST.Heig|
|00004af0| 68 74 20 3d 20 52 42 44 | 65 63 6c 61 72 65 53 54 |ht = RBD|eclareST|
|00004b00| 2e 48 65 69 67 68 74 20 | 2b 20 64 48 65 69 67 68 |.Height |+ dHeigh|
|00004b10| 74 29 53 65 70 61 72 61 | 74 6f 72 32 2e 54 6f 70 |t)Separa|tor2.Top|
|00004b20| 20 3d 20 53 65 70 61 72 | 61 74 6f 72 32 2e 54 6f | = Separ|ator2.To|
|00004b30| 70 20 2b 20 64 48 65 69 | 67 68 74 33 43 44 65 63 |p + dHei|ght3CDec|
|00004b40| 6c 61 72 65 4c 61 62 65 | 6c 53 54 2e 54 6f 70 20 |lareLabe|lST.Top |
|00004b50| 3d 20 43 44 65 63 6c 61 | 72 65 4c 61 62 65 6c 53 |= CDecla|reLabelS|
|00004b60| 54 2e 54 6f 70 20 2b 20 | 64 48 65 69 67 68 74 29 |T.Top + |dHeight)|
|00004b70| 43 56 4f 70 65 6e 46 69 | 6c 65 2e 54 6f 70 20 3d |CVOpenFi|le.Top =|
|00004b80| 20 43 56 4f 70 65 6e 46 | 69 6c 65 2e 54 6f 70 20 | CVOpenF|ile.Top |
|00004b90| 2b 20 64 48 65 69 67 68 | 74 29 43 44 65 63 6c 61 |+ dHeigh|t)CDecla|
|00004ba0| 72 65 53 54 2e 54 6f 70 | 20 3d 20 43 44 65 63 6c |reST.Top| = CDecl|
|00004bb0| 61 72 65 53 54 2e 54 6f | 70 20 2b 20 64 48 65 69 |areST.To|p + dHei|
|00004bc0| 67 68 74 2f 43 44 65 63 | 6c 61 72 65 53 54 2e 48 |ght/CDec|lareST.H|
|00004bd0| 65 69 67 68 74 20 3d 20 | 43 44 65 63 6c 61 72 65 |eight = |CDeclare|
|00004be0| 53 54 2e 48 65 69 67 68 | 74 20 2b 20 64 48 65 69 |ST.Heigh|t + dHei|
|00004bf0| 67 68 74 00 12 6f 6c 64 | 48 65 69 67 68 74 20 3d |ght..old|Height =|
|00004c00| 20 48 65 69 67 68 74 07 | 45 6e 64 20 53 75 62 05 | Height.|End Sub.|
|00004c10| 43 6c 6f 73 65 01 00 01 | 00 03 0b 53 75 62 20 43 |Close...|...Sub C|
|00004c20| 6c 6f 73 65 28 29 00 07 | 45 6e 64 20 53 75 62 0a |lose()..|End Sub.|
|00004c30| 44 65 61 63 74 69 76 61 | 74 65 01 15 01 15 03 10 |Deactiva|te......|
|00004c40| 53 75 62 20 44 65 61 63 | 74 69 76 61 74 65 28 29 |Sub Deac|tivate()|
|00004c50| 17 45 6e 61 62 6c 65 43 | 6f 6e 74 72 6f 6c 73 28 |.EnableC|ontrols(|
|00004c60| 20 66 61 6c 73 65 20 29 | 07 45 6e 64 20 53 75 62 | false )|.End Sub|
|00004c70| 08 41 63 74 69 76 61 74 | 65 01 16 01 16 03 0e 53 |.Activat|e......S|
|00004c80| 75 62 20 41 63 74 69 76 | 61 74 65 28 29 16 45 6e |ub Activ|ate().En|
|00004c90| 61 62 6c 65 43 6f 6e 74 | 72 6f 6c 73 28 20 74 72 |ableCont|rols( tr|
|00004ca0| 75 65 20 29 07 45 6e 64 | 20 53 75 62 0f 45 6e 61 |ue ).End| Sub.Ena|
|00004cb0| 62 6c 65 4d 65 6e 75 49 | 74 65 6d 73 02 17 02 17 |bleMenuI|tems....|
|00004cc0| 04 15 53 75 62 20 45 6e | 61 62 6c 65 4d 65 6e 75 |..Sub En|ableMenu|
|00004cd0| 49 74 65 6d 73 28 29 18 | 46 69 6c 65 43 6c 6f 73 |Items().|FileClos|
|00004ce0| 65 2e 65 6e 61 62 6c 65 | 64 20 3d 20 74 72 75 65 |e.enable|d = true|
|00004cf0| 17 45 64 69 74 43 6f 70 | 79 2e 65 6e 61 62 6c 65 |.EditCop|y.enable|
|00004d00| 64 20 3d 20 74 72 75 65 | 07 45 6e 64 20 53 75 62 |d = true|.End Sub|
|00004d10| 09 4d 6f 75 73 65 4d 6f | 76 65 01 00 01 00 03 29 |.MouseMo|ve.....)|
|00004d20| 53 75 62 20 4d 6f 75 73 | 65 4d 6f 76 65 28 58 20 |Sub Mous|eMove(X |
|00004d30| 41 73 20 49 6e 74 65 67 | 65 72 2c 20 59 20 41 73 |As Integ|er, Y As|
|00004d40| 20 49 6e 74 65 67 65 72 | 29 00 07 45 6e 64 20 53 | Integer|)..End S|
|00004d50| 75 62 04 4f 70 65 6e 01 | 12 01 12 03 0a 53 75 62 |ub.Open.|.....Sub|
|00004d60| 20 4f 70 65 6e 28 29 12 | 6f 6c 64 48 65 69 67 68 | Open().|oldHeigh|
|00004d70| 74 20 3d 20 48 65 69 67 | 68 74 07 45 6e 64 20 53 |t = Heig|ht.End S|
|00004d80| 75 62 02 09 46 69 6c 65 | 43 6c 6f 73 65 01 0c 01 |ub..File|Close...|
|00004d90| 0c 03 1a 46 75 6e 63 74 | 69 6f 6e 20 41 63 74 69 |...Funct|ion Acti|
|00004da0| 6f 6e 20 41 73 20 42 6f | 6f 6c 65 61 6e 0c 73 65 |on As Bo|olean.se|
|00004db0| 6c 66 2e 63 6c 6f 73 65 | 28 29 0c 45 6e 64 20 46 |lf.close|().End F|
|00004dc0| 75 6e 63 74 69 6f 6e 08 | 45 64 69 74 43 6f 70 79 |unction.|EditCopy|
|00004dd0| 0b 18 0b 1f 1b 1a 46 75 | 6e 63 74 69 6f 6e 20 41 |......Fu|nction A|
|00004de0| 63 74 69 6f 6e 20 41 73 | 20 42 6f 6f 6c 65 61 6e |ction As| Boolean|
|00004df0| 1a 2f 2f 20 49 20 63 72 | 65 61 74 65 64 20 61 20 |.// I cr|eated a |
|00004e00| 6e 65 77 20 6d 65 74 68 | 6f 64 3a 1a 2f 2f 20 22 |new meth|od:.// "|
|00004e10| 43 6f 70 79 52 65 73 75 | 6c 74 54 6f 43 6c 69 70 |CopyResu|ltToClip|
|00004e20| 62 6f 61 72 64 22 18 2f | 2f 20 62 65 63 61 75 73 |board"./|/ becaus|
|00004e30| 65 20 74 6f 20 67 65 74 | 20 72 69 64 20 6f 66 25 |e to get| rid of%|
|00004e40| 2f 2f 20 74 68 65 20 69 | 64 65 6e 74 69 63 20 63 |// the i|dentic c|
|00004e50| 6f 64 65 20 69 6e 20 43 | 6f 70 79 42 54 4e 2e 41 |ode in C|opyBTN.A|
|00004e60| 63 74 69 6f 6e 1b 2f 2f | 20 61 6e 64 20 4d 65 6e |ction.//| and Men|
|00004e70| 75 48 61 6e 64 6c 65 72 | 2e 45 64 69 74 43 6f 70 |uHandler|.EditCop|
|00004e80| 79 02 2f 2f 09 2f 2f 20 | 6a 61 6b 6f 62 62 00 17 |y.//.// |jakobb..|
|00004e90| 43 6f 70 79 52 65 73 75 | 6c 74 54 6f 43 6c 69 70 |CopyResu|ltToClip|
|00004ea0| 62 6f 61 72 64 28 29 00 | 1f 2f 2f 20 74 6f 20 73 |board().|.// to s|
|00004eb0| 74 61 72 74 20 77 69 74 | 68 20 69 20 75 73 65 64 |tart wit|h i used|
|00004ec0| 20 43 6f 70 79 42 54 4e | 21 2f 2f 20 74 6f 20 63 | CopyBTN|!// to c|
|00004ed0| 6f 70 79 20 74 65 78 74 | 20 74 6f 20 74 68 65 20 |opy text| to the |
|00004ee0| 63 6c 69 70 62 6f 61 72 | 64 2c 1b 2f 2f 20 62 75 |clipboar|d,.// bu|
|00004ef0| 74 20 77 68 65 6e 20 75 | 73 69 6e 67 20 63 6f 6d |t when u|sing com|
|00004f00| 6d 61 6e 64 2b 63 1d 2f | 2f 20 69 20 64 69 64 20 |mand+c./|/ i did |
|00004f10| 6e 6f 74 20 67 65 74 20 | 41 4e 59 20 66 65 65 64 |not get |ANY feed|
|00004f20| 62 61 63 6b 1e 2f 2f 20 | 74 68 65 20 66 6f 6c 6c |back.// |the foll|
|00004f30| 6f 77 69 6e 67 20 70 69 | 65 63 65 20 6f 66 20 63 |owing pi|ece of c|
|00004f40| 6f 64 65 25 2f 2f 20 68 | 69 6c 69 74 65 73 20 74 |ode%// h|ilites t|
|00004f50| 68 65 20 45 64 69 74 20 | 6d 65 6e 75 20 66 6f 72 |he Edit |menu for|
|00004f60| 20 31 30 20 74 69 63 6b | 73 27 2f 2f 20 73 6f 20 | 10 tick|s'// so |
|00004f70| 69 20 63 61 6e 20 66 65 | 65 6c 20 73 75 72 65 20 |i can fe|el sure |
|00004f80| 74 68 61 74 20 69 20 72 | 65 61 6c 6c 79 20 64 69 |that i r|eally di|
|00004f90| 64 11 2f 2f 20 63 6f 70 | 79 20 74 68 65 20 74 65 |d.// cop|y the te|
|00004fa0| 78 74 2e 2a 2f 2f 20 69 | 20 61 64 64 65 64 20 61 |xt.*// i| added a|
|00004fb0| 20 6d 6f 64 75 6c 65 20 | 63 61 6c 6c 65 64 20 54 | module |called T|
|00004fc0| 6f 6f 6c 62 6f 78 52 6f | 75 74 69 6e 65 73 26 2f |oolboxRo|utines&/|
|00004fd0| 2f 20 74 68 69 73 20 69 | 73 20 54 42 46 69 6e 64 |/ this i|s TBFind|
|00004fe0| 65 72 20 73 6f 20 74 68 | 65 72 65 20 73 68 6f 75 |er so th|ere shou|
|00004ff0| 6c 64 20 62 65 2b 2f 2f | 20 73 6f 6d 65 20 74 6f |ld be+//| some to|
|00005000| 6f 6c 62 6f 78 20 63 61 | 6c 6c 73 20 69 6e 20 74 |olbox ca|lls in t|
|00005010| 68 65 20 61 70 70 20 69 | 74 73 65 6c 66 20 3a 2d |he app i|tself :-|
|00005020| 29 00 19 54 42 48 69 6c | 69 74 65 4d 65 6e 75 28 |)..TBHil|iteMenu(|
|00005030| 33 29 20 2f 2f 20 6a 61 | 6b 6f 62 62 15 54 42 44 |3) // ja|kobb.TBD|
|00005040| 65 6c 61 79 28 31 30 29 | 20 2f 2f 20 6a 61 6b 6f |elay(10)| // jako|
|00005050| 62 62 00 0c 45 6e 64 20 | 46 75 6e 63 74 69 6f 6e |bb..End |Function|
|00005060| 00 12 07 00 00 b4 01 0a | 53 74 61 74 69 63 54 65 |........|StaticTe|
|00005070| 78 74 00 00 00 00 02 04 | 4f 70 65 6e 01 00 01 00 |xt......|Open....|
|00005080| 03 0a 53 75 62 20 4f 70 | 65 6e 28 29 00 07 45 6e |..Sub Op|en()..En|
|00005090| 64 20 53 75 62 09 4d 6f | 75 73 65 4d 6f 76 65 01 |d Sub.Mo|useMove.|
|000050a0| 00 01 00 03 29 53 75 62 | 20 4d 6f 75 73 65 4d 6f |....)Sub| MouseMo|
|000050b0| 76 65 28 58 20 41 73 20 | 49 6e 74 65 67 65 72 2c |ve(X As |Integer,|
|000050c0| 20 59 20 41 73 20 49 6e | 74 65 67 65 72 29 00 07 | Y As In|teger)..|
|000050d0| 45 6e 64 20 53 75 62 00 | 00 07 00 00 b4 01 0f 43 |End Sub.|.......C|
|000050e0| 53 74 61 74 69 63 54 65 | 78 74 50 6c 75 73 00 00 |StaticTe|xtPlus..|
|000050f0| 00 00 00 00 00 07 00 00 | b4 01 0f 43 53 74 61 74 |........|...CStat|
|00005100| 69 63 54 65 78 74 50 6c | 75 73 00 00 00 00 00 00 |icTextPl|us......|
|00005110| 00 07 00 00 b4 01 0f 43 | 53 74 61 74 69 63 54 65 |.......C|StaticTe|
|00005120| 78 74 50 6c 75 73 00 00 | 00 00 01 09 4d 6f 75 73 |xtPlus..|....Mous|
|00005130| 65 4d 6f 76 65 01 00 01 | 00 03 29 53 75 62 20 4d |eMove...|..)Sub M|
|00005140| 6f 75 73 65 4d 6f 76 65 | 28 58 20 41 73 20 49 6e |ouseMove|(X As In|
|00005150| 74 65 67 65 72 2c 20 59 | 20 41 73 20 49 6e 74 65 |teger, Y| As Inte|
|00005160| 67 65 72 29 00 07 45 6e | 64 20 53 75 62 00 00 07 |ger)..En|d Sub...|
|00005170| 00 00 a8 03 0b 42 65 76 | 65 6c 42 75 74 74 6f 6e |.....Bev|elButton|
|00005180| 00 00 00 00 05 09 4d 6f | 75 73 65 45 78 69 74 01 |......Mo|useExit.|
|00005190| 00 01 00 03 0f 53 75 62 | 20 4d 6f 75 73 65 45 78 |.....Sub| MouseEx|
|000051a0| 69 74 28 29 00 07 45 6e | 64 20 53 75 62 0a 4d 6f |it()..En|d Sub.Mo|
|000051b0| 75 73 65 45 6e 74 65 72 | 01 00 01 00 03 10 53 75 |useEnter|......Su|
|000051c0| 62 20 4d 6f 75 73 65 45 | 6e 74 65 72 28 29 00 07 |b MouseE|nter()..|
|000051d0| 45 6e 64 20 53 75 62 09 | 4d 6f 75 73 65 4d 6f 76 |End Sub.|MouseMov|
|000051e0| 65 01 00 01 00 03 29 53 | 75 62 20 4d 6f 75 73 65 |e.....)S|ub Mouse|
|000051f0| 4d 6f 76 65 28 58 20 41 | 73 20 49 6e 74 65 67 65 |Move(X A|s Intege|
|00005200| 72 2c 20 59 20 41 73 20 | 49 6e 74 65 67 65 72 29 |r, Y As |Integer)|
|00005210| 00 07 45 6e 64 20 53 75 | 62 0a 44 72 6f 70 4f 62 |..End Su|b.DropOb|
|00005220| 6a 65 63 74 01 00 01 00 | 03 1f 53 75 62 20 44 72 |ject....|..Sub Dr|
|00005230| 6f 70 4f 62 6a 65 63 74 | 28 6f 62 6a 20 41 73 20 |opObject|(obj As |
|00005240| 44 72 61 67 49 74 65 6d | 29 00 07 45 6e 64 20 53 |DragItem|)..End S|
|00005250| 75 62 06 41 63 74 69 6f | 6e 01 08 01 08 0f 0c 53 |ub.Actio|n......S|
|00005260| 75 62 20 41 63 74 69 6f | 6e 28 29 26 2f 2f 20 49 |ub Actio|n()&// I|
|00005270| 20 64 69 64 6e 27 74 20 | 77 61 6e 74 20 74 6f 20 | didn't |want to |
|00005280| 64 65 6c 65 74 65 20 74 | 68 69 73 20 62 75 74 2e |delete t|his but.|
|00005290| 2e 2e 35 2f 2f 20 6d 61 | 79 62 65 20 69 74 20 77 |..5// ma|ybe it w|
|000052a0| 6f 75 6c 64 20 62 65 20 | 61 20 67 6f 6f 64 20 69 |ould be |a good i|
|000052b0| 64 65 61 20 74 6f 20 64 | 6f 20 69 74 20 73 69 6e |dea to d|o it sin|
|000052c0| 63 65 20 69 74 20 69 73 | 14 2f 2f 20 6e 6f 20 6c |ce it is|.// no l|
|000052d0| 6f 6e 67 65 72 20 75 73 | 65 64 2e 2e 2e 0c 2f 2f |onger us|ed....//|
|000052e0| 20 67 75 69 6c 6c 61 75 | 6d 65 00 15 43 6f 70 79 | guillau|me..Copy|
|000052f0| 52 65 73 75 6c 74 54 6f | 43 6c 69 70 62 6f 61 72 |ResultTo|Clipboar|
|00005300| 64 00 b4 01 2f 2f 20 21 | 54 54 20 2d 20 49 20 74 |d...// !|TT - I t|
|00005310| 72 69 65 64 20 74 6f 20 | 61 64 64 20 73 6f 6d 65 |ried to |add some|
|00005320| 20 76 69 73 75 61 6c 20 | 66 65 65 64 62 61 63 6b | visual |feedback|
|00005330| 20 74 6f 20 74 68 69 73 | 20 62 75 74 74 6f 6e 2c | to this| button,|
|00005340| 20 73 69 6d 69 6c 61 72 | 20 74 6f 20 77 68 61 74 | similar| to what|
|00005350| 20 6a 61 6b 6f 62 62 20 | 64 69 64 20 69 6e 20 74 | jakobb |did in t|
|00005360| 68 65 20 45 64 69 74 43 | 6f 70 79 20 6d 65 6e 75 |he EditC|opy menu|
|00005370| 20 68 61 6e 64 6c 65 72 | af 01 2f 2f 20 69 74 20 | handler|..// it |
|00005380| 77 6f 72 6b 73 2c 20 62 | 75 74 20 69 74 20 6c 6f |works, b|ut it lo|
|00005390| 6f 6b 73 20 75 67 6c 79 | 20 69 66 20 74 68 65 20 |oks ugly| if the |
|000053a0| 62 75 74 74 6f 6e 20 77 | 61 73 20 62 65 66 6f 72 |button w|as befor|
|000053b0| 65 20 70 72 65 73 73 65 | 64 20 6c 6f 6e 67 20 65 |e presse|d long e|
|000053c0| 6e 6f 75 67 68 20 74 6f | 20 62 65 20 68 69 6c 69 |nough to| be hili|
|000053d0| 67 68 74 65 64 20 2d 20 | 69 74 20 66 6c 69 63 6b |ghted - |it flick|
|000053e0| 65 72 73 20 74 68 65 6e | 2e 0f 6d 65 2e 56 61 6c |ers then|..me.Val|
|000053f0| 75 65 20 3d 20 74 72 75 | 65 0a 6d 65 2e 52 65 66 |ue = tru|e.me.Ref|
|00005400| 72 65 73 68 0b 54 42 44 | 65 6c 61 79 28 31 30 29 |resh.TBD|elay(10)|
|00005410| 10 6d 65 2e 56 61 6c 75 | 65 20 3d 20 66 61 6c 73 |.me.Valu|e = fals|
|00005420| 65 07 45 6e 64 20 53 75 | 62 00 00 07 00 00 b4 01 |e.End Su|b.......|
|00005430| 0a 53 74 61 74 69 63 54 | 65 78 74 00 00 00 00 01 |.StaticT|ext.....|
|00005440| 09 4d 6f 75 73 65 4d 6f | 76 65 01 00 01 00 03 29 |.MouseMo|ve.....)|
|00005450| 53 75 62 20 4d 6f 75 73 | 65 4d 6f 76 65 28 58 20 |Sub Mous|eMove(X |
|00005460| 41 73 20 49 6e 74 65 67 | 65 72 2c 20 59 20 41 73 |As Integ|er, Y As|
|00005470| 20 49 6e 74 65 67 65 72 | 29 00 07 45 6e 64 20 53 | Integer|)..End S|
|00005480| 75 62 00 00 07 00 00 b4 | 01 0f 43 53 74 61 74 69 |ub......|..CStati|
|00005490| 63 54 65 78 74 50 6c 75 | 73 00 00 00 00 01 09 4d |cTextPlu|s......M|
|000054a0| 6f 75 73 65 4d 6f 76 65 | 01 00 01 00 03 29 53 75 |ouseMove|.....)Su|
|000054b0| 62 20 4d 6f 75 73 65 4d | 6f 76 65 28 58 20 41 73 |b MouseM|ove(X As|
|000054c0| 20 49 6e 74 65 67 65 72 | 2c 20 59 20 41 73 20 49 | Integer|, Y As I|
|000054d0| 6e 74 65 67 65 72 29 00 | 07 45 6e 64 20 53 75 62 |nteger).|.End Sub|
|000054e0| 00 00 07 00 00 bc 01 0b | 43 49 63 6f 6e 42 75 74 |........|CIconBut|
|000054f0| 74 6f 6e 00 00 00 00 06 | 09 4d 6f 75 73 65 45 78 |ton.....|.MouseEx|
|00005500| 69 74 01 00 01 00 03 0f | 53 75 62 20 4d 6f 75 73 |it......|Sub Mous|
|00005510| 65 45 78 69 74 28 29 00 | 07 45 6e 64 20 53 75 62 |eExit().|.End Sub|
|00005520| 06 41 63 74 69 6f 6e 01 | 00 01 00 03 0c 53 75 62 |.Action.|.....Sub|
|00005530| 20 41 63 74 69 6f 6e 28 | 29 00 07 45 6e 64 20 53 | Action(|)..End S|
|00005540| 75 62 07 4d 6f 75 73 65 | 55 70 01 00 01 00 03 27 |ub.Mouse|Up.....'|
|00005550| 53 75 62 20 4d 6f 75 73 | 65 55 70 28 58 20 41 73 |Sub Mous|eUp(X As|
|00005560| 20 49 6e 74 65 67 65 72 | 2c 20 59 20 41 73 20 49 | Integer|, Y As I|
|00005570| 6e 74 65 67 65 72 29 00 | 07 45 6e 64 20 53 75 62 |nteger).|.End Sub|
|00005580| 04 4f 70 65 6e 05 00 05 | 0f 08 0a 53 75 62 20 4f |.Open...|...Sub O|
|00005590| 70 65 6e 28 29 20 69 66 | 20 48 61 73 49 63 6f 6e |pen() if| HasIcon|
|000055a0| 53 65 72 76 69 63 65 73 | 28 29 20 74 68 65 6e 20 |Services|() then |
|000055b0| 2f 2f 20 21 21 21 10 6d | 65 2e 74 79 70 65 20 3d |// !!!.m|e.type =|
|000055c0| 20 22 63 6c 70 74 22 13 | 6d 65 2e 63 72 65 61 74 | "clpt".|me.creat|
|000055d0| 6f 72 20 3d 20 22 64 72 | 61 67 22 0b 65 6c 73 65 |or = "dr|ag".else|
|000055e0| 20 2f 2f 20 21 21 21 16 | 6d 65 2e 72 65 73 49 44 | // !!!.|me.resID|
|000055f0| 20 3d 20 31 30 30 31 20 | 2f 2f 20 21 21 21 0d 65 | = 1001 |// !!!.e|
|00005600| 6e 64 20 69 66 20 2f 2f | 20 21 21 21 07 45 6e 64 |nd if //| !!!.End|
|00005610| 20 53 75 62 09 4d 6f 75 | 73 65 44 72 61 67 03 09 | Sub.Mou|seDrag..|
|00005620| 03 13 06 0f 53 75 62 20 | 4d 6f 75 73 65 44 72 61 |....Sub |MouseDra|
|00005630| 67 28 29 11 64 69 6d 20 | 64 20 61 73 20 44 72 61 |g().dim |d as Dra|
|00005640| 67 49 74 65 6d 36 64 20 | 3d 20 4e 65 77 44 72 61 |gItem6d |= NewDra|
|00005650| 67 49 74 65 6d 28 6d 65 | 2e 6c 65 66 74 2c 6d 65 |gItem(me|.left,me|
|00005660| 2e 74 6f 70 2b 33 2c 6d | 65 2e 77 69 64 74 68 2c |.top+3,m|e.width,|
|00005670| 6d 65 2e 68 65 69 67 68 | 74 2d 33 29 19 64 2e 74 |me.heigh|t-3).d.t|
|00005680| 65 78 74 20 3d 20 52 42 | 44 65 63 6c 61 72 65 53 |ext = RB|DeclareS|
|00005690| 54 2e 74 65 78 74 06 64 | 2e 64 72 61 67 07 45 6e |T.text.d|.drag.En|
|000056a0| 64 20 53 75 62 09 4d 6f | 75 73 65 44 6f 77 6e 01 |d Sub.Mo|useDown.|
|000056b0| 00 01 00 03 39 46 75 6e | 63 74 69 6f 6e 20 4d 6f |....9Fun|ction Mo|
|000056c0| 75 73 65 44 6f 77 6e 28 | 58 20 41 73 20 49 6e 74 |useDown(|X As Int|
|000056d0| 65 67 65 72 2c 20 59 20 | 41 73 20 49 6e 74 65 67 |eger, Y |As Integ|
|000056e0| 65 72 29 20 41 73 20 42 | 6f 6f 6c 65 61 6e 00 0c |er) As B|oolean..|
|000056f0| 45 6e 64 20 46 75 6e 63 | 74 69 6f 6e 00 00 07 00 |End Func|tion....|
|00005700| 00 bc 01 0b 43 49 63 6f | 6e 42 75 74 74 6f 6e 00 |....CIco|nButton.|
|00005710| 00 00 00 05 06 41 63 74 | 69 6f 6e 02 00 02 04 05 |.....Act|ion.....|
|00005720| 0c 53 75 62 20 41 63 74 | 69 6f 6e 28 29 32 69 66 |.Sub Act|ion()2if|
|00005730| 20 6e 6f 74 20 4f 70 65 | 6e 46 69 6c 65 57 69 74 | not Ope|nFileWit|
|00005740| 68 43 72 65 61 74 6f 72 | 28 20 73 65 6c 66 2e 68 |hCreator|( self.h|
|00005750| 65 61 64 65 72 46 69 6c | 65 20 29 20 74 68 65 6e |eaderFil|e ) then|
|00005760| 04 62 65 65 70 06 65 6e | 64 20 69 66 07 45 6e 64 |.beep.en|d if.End|
|00005770| 20 53 75 62 09 4d 6f 75 | 73 65 44 72 61 67 01 00 | Sub.Mou|seDrag..|
|00005780| 01 00 03 0f 53 75 62 20 | 4d 6f 75 73 65 44 72 61 |....Sub |MouseDra|
|00005790| 67 28 29 00 07 45 6e 64 | 20 53 75 62 07 4d 6f 75 |g()..End| Sub.Mou|
|000057a0| 73 65 55 70 01 00 01 00 | 03 27 53 75 62 20 4d 6f |seUp....|.'Sub Mo|
|000057b0| 75 73 65 55 70 28 58 20 | 41 73 20 49 6e 74 65 67 |useUp(X |As Integ|
|000057c0| 65 72 2c 20 59 20 41 73 | 20 49 6e 74 65 67 65 72 |er, Y As| Integer|
|000057d0| 29 00 07 45 6e 64 20 53 | 75 62 04 4f 70 65 6e 01 |)..End S|ub.Open.|
|000057e0| 00 01 00 05 0a 53 75 62 | 20 4f 70 65 6e 28 29 22 |.....Sub| Open()"|
|000057f0| 69 66 20 6e 6f 74 20 48 | 61 73 49 63 6f 6e 53 65 |if not H|asIconSe|
|00005800| 72 76 69 63 65 73 20 74 | 68 65 6e 20 2f 2f 20 21 |rvices t|hen // !|
|00005810| 21 21 16 6d 65 2e 72 65 | 73 49 44 20 3d 20 31 30 |!!.me.re|sID = 10|
|00005820| 30 32 20 2f 2f 20 21 21 | 21 0d 65 6e 64 20 69 66 |02 // !!|!.end if|
|00005830| 20 2f 2f 20 21 21 21 07 | 45 6e 64 20 53 75 62 09 | // !!!.|End Sub.|
|00005840| 4d 6f 75 73 65 44 6f 77 | 6e 01 00 01 00 03 39 46 |MouseDow|n.....9F|
|00005850| 75 6e 63 74 69 6f 6e 20 | 4d 6f 75 73 65 44 6f 77 |unction |MouseDow|
|00005860| 6e 28 58 20 41 73 20 49 | 6e 74 65 67 65 72 2c 20 |n(X As I|nteger, |
|00005870| 59 20 41 73 20 49 6e 74 | 65 67 65 72 29 20 41 73 |Y As Int|eger) As|
|00005880| 20 42 6f 6f 6c 65 61 6e | 00 0c 45 6e 64 20 46 75 | Boolean|..End Fu|
|00005890| 6e 63 74 69 6f 6e 00 00 | 07 00 00 ac 01 06 42 54 |nction..|......BT|
|000058a0| 63 61 6e 76 00 00 00 00 | 01 09 4d 6f 75 73 65 44 |canv....|..MouseD|
|000058b0| 6f 77 6e 01 00 01 00 03 | 39 46 75 6e 63 74 69 6f |own.....|9Functio|
|000058c0| 6e 20 4d 6f 75 73 65 44 | 6f 77 6e 28 58 20 41 73 |n MouseD|own(X As|
|000058d0| 20 49 6e 74 65 67 65 72 | 2c 20 59 20 41 73 20 49 | Integer|, Y As I|
|000058e0| 6e 74 65 67 65 72 29 20 | 41 73 20 42 6f 6f 6c 65 |nteger) |As Boole|
|000058f0| 61 6e 00 0c 45 6e 64 20 | 46 75 6e 63 74 69 6f 6e |an..End |Function|
|00005900| 00 00 07 00 00 bc 01 0b | 43 49 63 6f 6e 42 75 74 |........|CIconBut|
|00005910| 74 6f 6e 00 00 00 00 06 | 06 41 63 74 69 6f 6e 01 |ton.....|.Action.|
|00005920| 21 01 21 03 0c 53 75 62 | 20 41 63 74 69 6f 6e 28 |!.!..Sub| Action(|
|00005930| 29 21 52 65 76 65 61 6c | 49 6e 46 69 6e 64 65 72 |)!Reveal|InFinder|
|00005940| 28 20 73 65 6c 66 2e 68 | 65 61 64 65 72 46 69 6c |( self.h|eaderFil|
|00005950| 65 20 29 07 45 6e 64 20 | 53 75 62 09 4d 6f 75 73 |e ).End |Sub.Mous|
|00005960| 65 44 72 61 67 01 00 01 | 00 03 0f 53 75 62 20 4d |eDrag...|...Sub M|
|00005970| 6f 75 73 65 44 72 61 67 | 28 29 00 07 45 6e 64 20 |ouseDrag|()..End |
|00005980| 53 75 62 07 4d 6f 75 73 | 65 55 70 01 00 01 00 03 |Sub.Mous|eUp.....|
|00005990| 27 53 75 62 20 4d 6f 75 | 73 65 55 70 28 58 20 41 |'Sub Mou|seUp(X A|
|000059a0| 73 20 49 6e 74 65 67 65 | 72 2c 20 59 20 41 73 20 |s Intege|r, Y As |
|000059b0| 49 6e 74 65 67 65 72 29 | 00 07 45 6e 64 20 53 75 |Integer)|..End Su|
|000059c0| 62 04 4f 70 65 6e 03 0e | 03 12 08 0a 53 75 62 20 |b.Open..|....Sub |
|000059d0| 4f 70 65 6e 28 29 20 69 | 66 20 48 61 73 49 63 6f |Open() i|f HasIco|
|000059e0| 6e 53 65 72 76 69 63 65 | 73 28 29 20 74 68 65 6e |nService|s() then|
|000059f0| 20 2f 2f 20 21 21 21 10 | 6d 65 2e 74 79 70 65 20 | // !!!.|me.type |
|00005a00| 3d 20 22 64 65 73 6b 22 | 13 6d 65 2e 63 72 65 61 |= "desk"|.me.crea|
|00005a10| 74 6f 72 20 3d 20 22 4d | 41 43 53 22 0b 65 6c 73 |tor = "M|ACS".els|
|00005a20| 65 20 2f 2f 20 21 21 21 | 16 6d 65 2e 72 65 73 49 |e // !!!|.me.resI|
|00005a30| 44 20 3d 20 31 30 30 30 | 20 2f 2f 20 21 21 21 0d |D = 1000| // !!!.|
|00005a40| 65 6e 64 20 69 66 20 2f | 2f 20 21 21 21 07 45 6e |end if /|/ !!!.En|
|00005a50| 64 20 53 75 62 09 4d 6f | 75 73 65 44 6f 77 6e 01 |d Sub.Mo|useDown.|
|00005a60| 00 01 00 03 39 46 75 6e | 63 74 69 6f 6e 20 4d 6f |....9Fun|ction Mo|
|00005a70| 75 73 65 44 6f 77 6e 28 | 58 20 41 73 20 49 6e 74 |useDown(|X As Int|
|00005a80| 65 67 65 72 2c 20 59 20 | 41 73 20 49 6e 74 65 67 |eger, Y |As Integ|
|00005a90| 65 72 29 20 41 73 20 42 | 6f 6f 6c 65 61 6e 00 0c |er) As B|oolean..|
|00005aa0| 45 6e 64 20 46 75 6e 63 | 74 69 6f 6e 05 50 61 69 |End Func|tion.Pai|
|00005ab0| 6e 74 01 00 01 00 03 18 | 53 75 62 20 50 61 69 6e |nt......|Sub Pain|
|00005ac0| 74 28 67 20 41 73 20 47 | 72 61 70 68 69 63 73 29 |t(g As G|raphics)|
|00005ad0| 00 07 45 6e 64 20 53 75 | 62 00 00 07 00 00 88 02 |..End Su|b.......|
|00005ae0| 0d 45 64 69 74 46 69 65 | 6c 64 50 6c 75 73 00 00 |.EditFie|ldPlus..|
|00005af0| 00 00 05 09 4d 6f 75 73 | 65 4d 6f 76 65 01 00 01 |....Mous|eMove...|
|00005b00| 00 03 29 53 75 62 20 4d | 6f 75 73 65 4d 6f 76 65 |..)Sub M|ouseMove|
|00005b10| 28 58 20 41 73 20 49 6e | 74 65 67 65 72 2c 20 59 |(X As In|teger, Y|
|00005b20| 20 41 73 20 49 6e 74 65 | 67 65 72 29 00 07 45 6e | As Inte|ger)..En|
|00005b30| 64 20 53 75 62 09 53 65 | 6c 43 68 61 6e 67 65 01 |d Sub.Se|lChange.|
|00005b40| 00 01 00 03 0f 53 75 62 | 20 53 65 6c 43 68 61 6e |.....Sub| SelChan|
|00005b50| 67 65 28 29 00 07 45 6e | 64 20 53 75 62 0a 54 65 |ge()..En|d Sub.Te|
|00005b60| 78 74 43 68 61 6e 67 65 | 02 82 01 02 82 01 0d 10 |xtChange|........|
|00005b70| 53 75 62 20 54 65 78 74 | 43 68 61 6e 67 65 28 29 |Sub Text|Change()|
|00005b80| 3f 2f 2f 20 54 68 69 73 | 20 69 73 20 73 69 6c 6c |?// This| is sill|
|00005b90| 79 20 61 6e 64 20 6c 6f | 6f 6b 73 20 61 20 62 69 |y and lo|oks a bi|
|00005ba0| 74 20 77 65 69 72 64 20 | 28 74 68 6f 75 67 68 20 |t weird |(though |
|00005bb0| 62 65 74 74 65 72 20 74 | 68 61 6e 20 77 68 65 6e |better t|han when|
|00005bc0| 82 01 2f 2f 20 74 68 65 | 20 53 65 6c 53 74 61 72 |..// the| SelStar|
|00005bd0| 74 20 66 6f 72 20 74 68 | 65 20 45 46 20 77 61 73 |t for th|e EF was|
|00005be0| 20 61 74 20 74 68 65 20 | 65 6e 64 29 2c 20 62 75 | at the |end), bu|
|00005bf0| 74 20 69 74 20 68 61 73 | 20 74 6f 20 62 65 20 64 |t it has| to be d|
|00005c00| 6f 6e 65 2e 00 18 2f 2f | 20 49 66 20 49 20 65 78 |one...//| If I ex|
|00005c10| 65 63 75 74 65 20 74 68 | 65 20 6c 69 6e 65 1b 2f |ecute th|e line./|
|00005c20| 2f 20 52 42 44 65 63 6c | 61 72 65 53 54 2e 73 65 |/ RBDecl|areST.se|
|00005c30| 6c 73 74 61 72 74 20 3d | 20 30 2a 2f 2f 20 69 6e |lstart =| 0*// in|
|00005c40| 20 74 68 69 73 20 65 76 | 65 6e 74 20 68 61 6e 64 | this ev|ent hand|
|00005c50| 6c 65 72 2c 20 6e 6f 74 | 68 69 6e 67 20 68 61 70 |ler, not|hing hap|
|00005c60| 70 65 6e 73 2e 3a 2f 2f | 20 53 6f 20 61 20 74 69 |pens.://| So a ti|
|00005c70| 6d 65 72 20 28 77 69 74 | 68 20 61 20 70 65 72 69 |mer (wit|h a peri|
|00005c80| 6f 64 20 6f 66 20 31 20 | 6d 69 6c 6c 69 73 65 63 |od of 1 |millisec|
|00005c90| 6f 6e 64 73 29 20 69 73 | 20 6e 65 65 64 65 64 2e |onds) is| needed.|
|00005ca0| 00 0c 2f 2f 20 67 75 69 | 6c 6c 61 75 6d 65 00 15 |..// gui|llaume..|
|00005cb0| 47 6f 54 6f 54 6f 70 54 | 69 6d 65 72 2e 4d 6f 64 |GoToTopT|imer.Mod|
|00005cc0| 65 20 3d 20 31 07 45 6e | 64 20 53 75 62 04 4f 70 |e = 1.En|d Sub.Op|
|00005cd0| 65 6e 01 18 01 18 03 0a | 53 75 62 20 4f 70 65 6e |en......|Sub Open|
|00005ce0| 28 29 18 6d 65 2e 62 61 | 63 6b 43 6f 6c 6f 72 20 |().me.ba|ckColor |
|00005cf0| 3d 20 66 69 6c 6c 43 6f | 6c 6f 72 07 45 6e 64 20 |= fillCo|lor.End |
|00005d00| 53 75 62 07 4b 65 79 44 | 6f 77 6e 01 00 01 00 03 |Sub.KeyD|own.....|
|00005d10| 2a 46 75 6e 63 74 69 6f | 6e 20 4b 65 79 44 6f 77 |*Functio|n KeyDow|
|00005d20| 6e 28 4b 65 79 20 41 73 | 20 53 74 72 69 6e 67 29 |n(Key As| String)|
|00005d30| 20 41 73 20 42 6f 6f 6c | 65 61 6e 00 0c 45 6e 64 | As Bool|ean..End|
|00005d40| 20 46 75 6e 63 74 69 6f | 6e 00 00 07 00 00 a4 01 | Functio|n.......|
|00005d50| 0d 53 65 70 61 72 61 74 | 6f 72 50 6c 75 73 00 00 |.Separat|orPlus..|
|00005d60| 00 00 00 00 00 07 00 00 | a4 01 0d 53 65 70 61 72 |........|...Separ|
|00005d70| 61 74 6f 72 50 6c 75 73 | 00 00 00 00 00 00 00 07 |atorPlus|........|
|00005d80| 00 00 28 05 54 69 6d 65 | 72 00 00 00 00 01 06 41 |..(.Time|r......A|
|00005d90| 63 74 69 6f 6e 01 25 01 | 25 03 0c 53 75 62 20 41 |ction.%.|%..Sub A|
|00005da0| 63 74 69 6f 6e 28 29 25 | 52 42 44 65 63 6c 61 72 |ction()%|RBDeclar|
|00005db0| 65 53 54 2e 73 65 6c 73 | 74 61 72 74 20 3d 20 30 |eST.sels|tart = 0|
|00005dc0| 20 2f 2f 20 67 75 69 6c | 6c 61 75 6d 65 07 45 6e | // guil|laume.En|
|00005dd0| 64 20 53 75 62 00 00 07 | 00 00 bc 01 0b 43 49 63 |d Sub...|.....CIc|
|00005de0| 6f 6e 42 75 74 74 6f 6e | 00 00 00 00 03 04 4f 70 |onButton|......Op|
|00005df0| 65 6e 01 0f 01 0f 03 0a | 53 75 62 20 4f 70 65 6e |en......|Sub Open|
|00005e00| 28 29 0f 6d 65 2e 52 65 | 73 49 44 20 3d 20 31 30 |().me.Re|sID = 10|
|00005e10| 30 36 07 45 6e 64 20 53 | 75 62 06 41 63 74 69 6f |06.End S|ub.Actio|
|00005e20| 6e 01 bc 03 01 bc 03 03 | 0c 53 75 62 20 41 63 74 |n.......|.Sub Act|
|00005e30| 69 6f 6e 28 29 bc 03 53 | 68 6f 77 55 52 4c 20 22 |ion()..S|howURL "|
|00005e40| 68 74 74 70 3a 2f 2f 73 | 65 61 72 63 68 2e 61 70 |http://s|earch.ap|
|00005e50| 70 6c 65 2e 63 6f 6d 2f | 73 39 37 69 73 2e 76 74 |ple.com/|s97is.vt|
|00005e60| 73 3f 41 63 74 69 6f 6e | 3d 46 69 6c 74 65 72 53 |s?Action|=FilterS|
|00005e70| 65 61 72 63 68 26 52 65 | 73 75 6c 74 54 65 6d 70 |earch&Re|sultTemp|
|00005e80| 6c 61 74 65 3d 77 65 62 | 78 31 31 2e 68 74 73 26 |late=web|x11.hts&|
|00005e90| 53 65 72 76 65 72 4b 65 | 79 3d 50 72 69 6d 61 72 |ServerKe|y=Primar|
|00005ea0| 79 26 66 69 6c 74 65 72 | 3d 6e 75 6c 6c 66 6c 74 |y&filter|=nullflt|
|00005eb0| 2e 68 74 73 26 53 65 61 | 72 63 68 50 61 67 65 3d |.hts&Sea|rchPage=|
|00005ec0| 68 74 74 70 25 33 41 25 | 32 46 25 32 46 73 65 61 |http%3A%|2F%2Fsea|
|00005ed0| 72 63 68 2e 61 70 70 6c | 65 2e 63 6f 6d 25 32 46 |rch.appl|e.com%2F|
|00005ee0| 69 6e 64 65 78 2e 68 74 | 6d 6c 26 63 6f 6c 6c 6e |index.ht|ml&colln|
|00005ef0| 61 6d 65 3d 64 65 76 65 | 6c 6f 70 65 72 26 71 75 |ame=deve|loper&qu|
|00005f00| 65 72 79 54 65 78 74 3d | 22 20 2b 20 73 65 6c 66 |eryText=|" + self|
|00005f10| 2e 54 69 74 6c 65 20 2b | 20 22 26 53 45 41 52 43 |.Title +| "&SEARC|
|00005f20| 48 2e 78 3d 32 36 26 53 | 45 41 52 43 48 2e 79 3d |H.x=26&S|EARCH.y=|
|00005f30| 31 34 22 07 45 6e 64 20 | 53 75 62 05 50 61 69 6e |14".End |Sub.Pain|
|00005f40| 74 01 00 01 00 03 18 53 | 75 62 20 50 61 69 6e 74 |t......S|ub Paint|
|00005f50| 28 67 20 41 73 20 47 72 | 61 70 68 69 63 73 29 00 |(g As Gr|aphics).|
|00005f60| 07 45 6e 64 20 53 75 62 | 00 00 07 00 00 a4 01 0a |.End Sub|........|
|00005f70| 43 53 75 6e 6b 65 6e 42 | 6f 78 00 00 00 00 00 00 |CSunkenB|ox......|
|00005f80| 00 07 00 00 b4 01 0a 53 | 74 61 74 69 63 54 65 78 |.......S|taticTex|
|00005f90| 74 00 00 00 00 00 00 00 | 12 0a 53 74 61 74 69 63 |t.......|..Static|
|00005fa0| 54 65 78 74 17 04 4e 61 | 6d 65 0c 78 52 42 44 65 |Text..Na|me.xRBDe|
|00005fb0| 63 6c 61 72 65 53 54 05 | 49 6e 64 65 78 0b 2d 32 |clareST.|Index.-2|
|00005fc0| 31 34 37 34 38 33 36 34 | 38 0d 54 61 62 50 61 6e |14748364|8.TabPan|
|00005fd0| 65 6c 49 6e 64 65 78 01 | 30 07 56 69 73 69 62 6c |elIndex.|0.Visibl|
|00005fe0| 65 05 46 61 6c 73 65 04 | 4c 65 66 74 02 36 31 03 |e.False.|Left.61.|
|00005ff0| 54 6f 70 02 36 33 05 57 | 69 64 74 68 03 33 30 38 |Top.63.W|idth.308|
|00006000| 06 48 65 69 67 68 74 02 | 33 38 0b 42 61 6c 6c 6f |.Height.|38.Ballo|
|00006010| 6f 6e 48 65 6c 70 00 13 | 44 69 73 61 62 6c 65 64 |onHelp..|Disabled|
|00006020| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 08 4c 6f 63 |BalloonH|elp..Loc|
|00006030| 6b 4c 65 66 74 04 54 72 | 75 65 07 4c 6f 63 6b 54 |kLeft.Tr|ue.LockT|
|00006040| 6f 70 04 54 72 75 65 09 | 4c 6f 63 6b 52 69 67 68 |op.True.|LockRigh|
|00006050| 74 04 54 72 75 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |t.True.L|ockBotto|
|00006060| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|00006070| 06 47 65 6e 65 76 61 08 | 54 65 78 74 53 69 7a 65 |.Geneva.|TextSize|
|00006080| 01 39 04 42 6f 6c 64 05 | 46 61 6c 73 65 06 49 74 |.9.Bold.|False.It|
|00006090| 61 6c 69 63 05 46 61 6c | 73 65 09 55 6e 64 65 72 |alic.Fal|se.Under|
|000060a0| 6c 69 6e 65 05 46 61 6c | 73 65 04 54 65 78 74 06 |line.Fal|se.Text.|
|000060b0| 4c 61 62 65 6c 3a 09 54 | 65 78 74 41 6c 69 67 6e |Label:.T|extAlign|
|000060c0| 01 30 09 54 65 78 74 43 | 6f 6c 6f 72 01 30 09 4d |.0.TextC|olor.0.M|
|000060d0| 75 6c 74 69 4c 69 6e 65 | 04 54 72 75 65 00 0a 53 |ultiLine|.True..S|
|000060e0| 74 61 74 69 63 54 65 78 | 74 17 04 4e 61 6d 65 10 |taticTex|t..Name.|
|000060f0| 52 42 44 65 63 6c 61 72 | 65 4c 61 62 65 6c 53 54 |RBDeclar|eLabelST|
|00006100| 05 49 6e 64 65 78 0b 2d | 32 31 34 37 34 38 33 36 |.Index.-|21474836|
|00006110| 34 38 0d 54 61 62 50 61 | 6e 65 6c 49 6e 64 65 78 |48.TabPa|nelIndex|
|00006120| 01 30 07 56 69 73 69 62 | 6c 65 04 54 72 75 65 04 |.0.Visib|le.True.|
|00006130| 4c 65 66 74 02 36 31 03 | 54 6f 70 02 34 34 05 57 |Left.61.|Top.44.W|
|00006140| 69 64 74 68 03 32 34 34 | 06 48 65 69 67 68 74 02 |idth.244|.Height.|
|00006150| 31 32 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |12.Ballo|onHelp..|
|00006160| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00006170| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|00006180| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|00006190| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|000061a0| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|000061b0| 73 65 08 54 65 78 74 46 | 6f 6e 74 06 47 65 6e 65 |se.TextF|ont.Gene|
|000061c0| 76 61 08 54 65 78 74 53 | 69 7a 65 01 39 04 42 6f |va.TextS|ize.9.Bo|
|000061d0| 6c 64 05 46 61 6c 73 65 | 06 49 74 61 6c 69 63 05 |ld.False|.Italic.|
|000061e0| 46 61 6c 73 65 09 55 6e | 64 65 72 6c 69 6e 65 05 |False.Un|derline.|
|000061f0| 46 61 6c 73 65 04 54 65 | 78 74 25 54 68 65 20 52 |False.Te|xt%The R|
|00006200| 45 41 4c 62 61 73 69 63 | 20 64 65 63 6c 61 72 65 |EALbasic| declare|
|00006210| 20 73 74 61 74 65 6d 65 | 6e 74 20 67 6f 65 73 3a | stateme|nt goes:|
|00006220| 09 54 65 78 74 41 6c 69 | 67 6e 01 30 09 54 65 78 |.TextAli|gn.0.Tex|
|00006230| 74 43 6f 6c 6f 72 01 30 | 09 4d 75 6c 74 69 4c 69 |tColor.0|.MultiLi|
|00006240| 6e 65 05 46 61 6c 73 65 | 01 0a 53 74 61 74 69 63 |ne.False|..Static|
|00006250| 54 65 78 74 17 04 4e 61 | 6d 65 0f 43 44 65 63 6c |Text..Na|me.CDecl|
|00006260| 61 72 65 4c 61 62 65 6c | 53 54 05 49 6e 64 65 78 |areLabel|ST.Index|
|00006270| 0b 2d 32 31 34 37 34 38 | 33 36 34 38 0d 54 61 62 |.-214748|3648.Tab|
|00006280| 50 61 6e 65 6c 49 6e 64 | 65 78 01 30 07 56 69 73 |PanelInd|ex.0.Vis|
|00006290| 69 62 6c 65 04 54 72 75 | 65 04 4c 65 66 74 02 36 |ible.Tru|e.Left.6|
|000062a0| 31 03 54 6f 70 03 31 33 | 37 05 57 69 64 74 68 03 |1.Top.13|7.Width.|
|000062b0| 32 33 36 06 48 65 69 67 | 68 74 02 31 32 0b 42 61 |236.Heig|ht.12.Ba|
|000062c0| 6c 6c 6f 6f 6e 48 65 6c | 70 00 13 44 69 73 61 62 |lloonHel|p..Disab|
|000062d0| 6c 65 64 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 08 |ledBallo|onHelp..|
|000062e0| 4c 6f 63 6b 4c 65 66 74 | 05 46 61 6c 73 65 07 4c |LockLeft|.False.L|
|000062f0| 6f 63 6b 54 6f 70 05 46 | 61 6c 73 65 09 4c 6f 63 |ockTop.F|alse.Loc|
|00006300| 6b 52 69 67 68 74 05 46 | 61 6c 73 65 0a 4c 6f 63 |kRight.F|alse.Loc|
|00006310| 6b 42 6f 74 74 6f 6d 05 | 46 61 6c 73 65 08 54 65 |kBottom.|False.Te|
|00006320| 78 74 46 6f 6e 74 06 47 | 65 6e 65 76 61 08 54 65 |xtFont.G|eneva.Te|
|00006330| 78 74 53 69 7a 65 01 39 | 04 42 6f 6c 64 05 46 61 |xtSize.9|.Bold.Fa|
|00006340| 6c 73 65 06 49 74 61 6c | 69 63 05 46 61 6c 73 65 |lse.Ital|ic.False|
|00006350| 09 55 6e 64 65 72 6c 69 | 6e 65 05 46 61 6c 73 65 |.Underli|ne.False|
|00006360| 04 54 65 78 74 1f 54 68 | 65 20 6f 72 69 67 69 6e |.Text.Th|e origin|
|00006370| 61 6c 20 43 20 64 65 63 | 6c 61 72 61 74 69 6f 6e |al C dec|laration|
|00006380| 20 77 61 73 3a 09 54 65 | 78 74 41 6c 69 67 6e 01 | was:.Te|xtAlign.|
|00006390| 30 09 54 65 78 74 43 6f | 6c 6f 72 01 30 09 4d 75 |0.TextCo|lor.0.Mu|
|000063a0| 6c 74 69 4c 69 6e 65 05 | 46 61 6c 73 65 02 0a 53 |ltiLine.|False..S|
|000063b0| 74 61 74 69 63 54 65 78 | 74 17 04 4e 61 6d 65 0a |taticTex|t..Name.|
|000063c0| 43 44 65 63 6c 61 72 65 | 53 54 05 49 6e 64 65 78 |CDeclare|ST.Index|
|000063d0| 0b 2d 32 31 34 37 34 38 | 33 36 34 38 0d 54 61 62 |.-214748|3648.Tab|
|000063e0| 50 61 6e 65 6c 49 6e 64 | 65 78 01 30 07 56 69 73 |PanelInd|ex.0.Vis|
|000063f0| 69 62 6c 65 04 54 72 75 | 65 04 4c 65 66 74 02 36 |ible.Tru|e.Left.6|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
